alarm
Задайте вопрос
Информатика
David Roberts

Программу в Pascal Составить программу Задание:Дано число А если А больше 0 то уменьшить на 8 иначе увеличить на 6. Например :readln(a);if a > 0 then a := a + 1;writeln(a);

ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:

program a;

var a:integer;

begin

readln(a);

if a > 0 then a:= a-8;

else a:=a+6;

writeln (a);

end.

374
Valentina
Чтобы ответить необходимо зарегистрироваться.

Другие вопросы: - Информатика

посчитайте СОР ПО ИНФОРМАТИКЕ 6

Дано число. Если оно положительн

PythonПочему при выводе среднего

посчитайте, язык: Питон11. Нап

Ваша родина вирішила зробити рем

Сплануй і розроби власний проект

Контакты
Реклама на сайте