Регистрация
студент168
26.02.2023 16:16
Информатика
Есть ответ 👍

Паскаль выдаёт ошибку exitcode 205.что не так? program summa; var n: integer; x,a,s: real; begin x: =1; a: =1; s: =1; n: =0; while abs(a)> 1e-6 do begin a: =a*(-1)*x*x*(2*n+1)/2*n+3; s: =4*s+a; n: =n+1; end;

155
354
Посмотреть ответы 2

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

НИКвсе
НИКвсе
4,7(64 оценок)
Утебя отсутствует 'end.'
BlackStile
BlackStile
4,7(16 оценок)
Var   a,f,s,i: longint; begin               for i: =1 to 3 do begin               readln(a);               inc(s,a);               if (a< 0) then inc(f); end;               writeln(s);               writeln(f); end.

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