Верна ли следующая программа? Если да, то сколько операторов она содержит, если нет, то почему: var x,y:integer; begin readln(y);; x:=0; if x>0 then; writeln(x,y); readln; end.
Ответы
Ответ дал:
0
Нет конечно) 1. Две ";" после readln. 2. Присваивание х := 0, а затем сравнение его с нулем. 3. после then ';' не пишется. Как-то так)
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад