Верна ли следующая программа? Если да, то сколько операторов она содержит, если не?
Верна ли следующая программа? Если да, то сколько операторов она содержит, если не??, то почему: var x,y:integer; begin readln(y);; x:=0; if x>0 then; writeln(x,y); readln; end
Гость
Ответ(ы) на вопрос:
Гость Var x, y: integer;
begin
readln(y);
x := 0;
if x>0 then (двоеточие не надо)
writeln(x, y);
end.
Не нашли ответ?
Похожие вопросы