Вопрос школьника по предмету Информатика
составить алгеритм удвоения нечетного числа и увеличения в три раза четного
Ответ учителя по предмету Информатика
var n:integer;
begin
write(‘n = ‘);
readln(n);
if n mod 2 = 0
then n:=3*n else n:=2*n;
writeln(‘n = ‘,n);
end.
Пример:
n = 7
n = 14
Похожие вопросы от пользователей
Какое расстояние будет между ними черех 0.6 ч ?
Заранее спасибо)))