Верна ли следующая программа? Если да, то сколько операторов она содержит, если нет, то почему: 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); readln; end.
Гость
Ответ(ы) на вопрос:
Гостьprogram a1;
var x,y: integer;
begin
writeln('vpishite chislo y');
read(y)"
x:=y
writeln('x= ');
End.
Не нашли ответ?
Похожие вопросы