Saonav 2 ноября 2019 в 10:32
Дано число. Если оно не делится на 5, то увеличить число в 5 раз, в противном случае уменьшить число в 5 раз.
Дано число. Если оно не делится на 5, то увеличить число в 5 раз, в противном случае уменьшить число в 5 раз.
Program Znanija;
var a:integer;
begin
readln(a);
if a mod 5 = 0 then
writeln(a / 5)
else
writeln(a * 5);
end.
var a:integer;
begin
readln(a);
if a mod 5 = 0 then
writeln(a / 5)
else
writeln(a * 5);
end.
Компьютеры и вычисления
149
21
Для комментирования необходимо зарегистрироваться на сайте