Question

Перевести с pascal to c++
uses crt;
var n,a:integer;
s:real;
begin
clrscr;
writeln('Вводите неотрицательные целые числа, окончание ввода отрицательное число:');
s:=0;
n:=0;
repeat
readln(a);
if a>=0 then
begin
s:=s+a;
n:=n+1;
end
until a<0;
if n=0 then write('Не введено ни одного неотрицательного числа')
else
begin
s:=s/n;
write('Ср. ариф. неотрицательных=',s:0:2);
end;
readln
end.

Answer 1

#include <iostream>

using namespace std;

int main()

{

int n, a;

float s;

system("cls");

cout << "Вводите неотрицательные целые числа, окончание ввода отрицательное число:" << endl;

s = 0;

n = 0;

do

{

 cin >> a;

 if (a >= 0)

 {

  s = s + a;

  n = n + 1;

 }

} while (a >= 0);

if (n == 0) cout << "Не введено ни одного неотрицательного числа" << endl;

else

{

 s = s / n;

 cout << "Ср. ариф. неотрицательных=" << s << endl;

}

cin.get();

return 0;

}