Program n_66; var x, max: real; i: integer; begin - вопрос №891574366 от Artishokq 30.07.2020 04:13

Question

Информатика: Program n_66; var x, max: real; i: integer; begin writeln ( введите число ); readln (max); for i: =1 to 9 do begin writeln (x); if x max then max: =x end writeln ( максимум - , max ); end. встречено writeln а ожидалось ;

Artishokq · Answer

После первого end поставь ;Если не скажи...

Program n_66; var x, max: real; i: integer; begin writeln ('введите число'); readln (max); for i: =1 to 9 do begin writeln (x); if x> max then max: =x end writeln ('максимум -', max'); end. встречено 'writeln' а ожидалось '; '