Program n_66; var x, max: real; i: integer; begin - вопрос №891484166 от strakh1991 10.10.2020 13:54

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 а ожидалось ;

strakh1991 · 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' а ожидалось '; '