Ответы
Ответ дал:
0
Var m,n:integer;
Begin
Writeln('Введите значения переменных m и n');
Readln(n,m);
While m>6 do (насчёт записи вайла неуверена, подправьте, если я допустила ошибку)
Begin
m:=m-2;
n:=n*2;
End;
Writeln('n = ', n,' m = ', m);
End.
Begin
Writeln('Введите значения переменных m и n');
Readln(n,m);
While m>6 do (насчёт записи вайла неуверена, подправьте, если я допустила ошибку)
Begin
m:=m-2;
n:=n*2;
End;
Writeln('n = ', n,' m = ', m);
End.
Ответ дал:
0
давай в pascal
Ответ дал:
0
пожалуйста
Ответ дал:
0
забыл написать
Ответ дал:
0
Cout<
Ответ дал:
0
Прошу прощения, были проблемы с загрузкой
Вас заинтересует
2 года назад
2 года назад
2 года назад
9 лет назад
9 лет назад