Program n_66; var x, max: real; i: integer; begin - вопрос №668915066 от Sagi511 20.07.2022 20:44

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

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