Предмет: Информатика,
автор: skifs
Информатика "Программирование разветвляющихся алгоритмов"
1. Увеличить число X на 10, если оно положительное, во всех остальных случаях уменьшить на 10.
2. Увеличить число X на 5, если оно положительное.
Ответы
Автор ответа:
0
var x:integer;
Begin
read(x);
if x>0 then x:=x+10
else x:=x-10;
writeln(x);
read(x);
if x>0 then x:=x+5;
writeln(x);
End.
Интересные вопросы
Предмет: Русский язык,
автор: hilight008800
Предмет: Математика,
автор: alisanurlanbekkyzy
Предмет: ОБЖ,
автор: kozhuharvasa
Предмет: Математика,
автор: natasha12345