Регистрация
smorodina83
15.06.2023 07:39
Информатика
Есть ответ 👍

Дана программа: Program Primer;
Var
N,result : real;
Begin
Writeln('Введите значения переменной N');
Write('N=');
Readln(N);
Result := sqr((3+N)*11);
Writeln (result:8:0);
Readln;
End.

Запусти Паскаль, введи данную программу, получи результат, если N=5.

205
298
Посмотреть ответы 1

Ответы на вопрос:

вика3844
вика3844
4,5(35 оценок)
Var a,sum,sr: real; i: integer; begin sum: =0; for i: =1 to 6 do begin writeln ('введи число'); read (a);     sum: =sum+a; end; sr: =sum/6;   writeln ('среднее арифметическое равно',sr); end.

Популярно: Информатика