Дано целое число N увеличить число в 3 раза если число четное . Входные данные 4. Выв?
Дано целое число N увеличить число в 3 раза если число четное . Входные данные 4. Выв??димые данные 12. Паскаль.
Гость
Ответ(ы) на вопрос:
Гость //Pascal ABC.NET v3.1 сборка 1172
var
n: integer;
begin
read(n);
if n mod 2 = 0 then n := n * 3;
writeln(n);
end.
Пример ввода:
4
Пример вывода:
12
Не нашли ответ?
Похожие вопросы