Срочно paskal abs решите срочно дам 1000 баллов если решите скину ссылку на 1000 баллов дано одно число если это число больше 5 заменить его на 0 если нет заменить на 1
Срочно paskal abs решите срочно дам 1000 баллов если решите скину ссылку на 1000 баллов
дано одно число если это число больше 5 заменить его на 0 если нет заменить на 1
Ответ(ы) на вопрос:
Скорее всего, имеется в виду вот это:
var x:integer;
begin
write('x=');readln(x);
if x>5 then x:=0 else x:=1;
writeln('x=',x);
end.
Не нашли ответ?
Похожие вопросы