Предмет: Информатика,
автор: Аноним
срочно paskal abs решите срочно дам 1000 баллов если решите скину ссылку на 1000 баллов
дано одно число если это число больше 5 заменить его на 0 если нет заменить на 1
Ответы
Автор ответа:
0
Скорее всего, имеется в виду вот это:
var x:integer;
begin
write('x=');readln(x);
if x>5 then x:=0 else x:=1;
writeln('x=',x);
end.
var x:integer;
begin
write('x=');readln(x);
if x>5 then x:=0 else x:=1;
writeln('x=',x);
end.
Интересные вопросы
Предмет: История,
автор: Аноним
Предмет: География,
автор: sonya20088
Предмет: Физика,
автор: Masha00000585
Предмет: История,
автор: lerashikinova
Предмет: Обществознание,
автор: harout777