Ответ(ы) на вопрос:
ГостьProgram E31;
var a, y: integer;
begin
write('a = ');
read(a);
if a > 0 then y := 3
else y := 6;
write('y = ', y);
readln;
end.
Не нашли ответ?
Похожие вопросы