Дано число. Если оно не делится на 5, то увеличить число в 5 раз, в противном случае уменьшить число в 5 раз.
Ответы
Ответ дал:
0
var a:integer;
begin
writeln ('a=');
readln(a);
if a mod 5=0 then writeln ('Yes ',a/5) else writeln('NO ', 5*a);
readln;
end
begin
writeln ('a=');
readln(a);
if a mod 5=0 then writeln ('Yes ',a/5) else writeln('NO ', 5*a);
readln;
end
Ответ дал:
0
а это правильно ?
Ответ дал:
0
спасибо большое
Ответ дал:
0
спасибо большое
Вас заинтересует
1 год назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад