Написать программу: Дано число, если оно делится на 8, увеличить его на 3, иначе уменьшить в 10 раз. Результат вывести на экран.

Question

Владимир Мальцев

Информатика

26 марта, 13:02

Написать программу: Дано число, если оно делится на 8, увеличить его на 3, иначе уменьшить в 10 раз. Результат вывести на экран.

+3

Ответы (1)

Знаешь ответ на этот вопрос?

Михаил Шишкин · Answer 1

на паскале эта программа будет выглядеть так:

program chislo;

var a:integer;

begin

readln (a);

if a mod 8=0

then a:=a+3

else a:=a div 10;

writeln (a);

end.