marianachornii
13.10.2020 01:32

Записать программу данного числа возведенного в куб если оно четное или увеличить на 3 если оно нечетное

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
машуля5552
14.02.2021 20:40

 

program Pr1;
var a,y,z:integer;
x:real;
begin
readln(a);
if a mod 2 = 0 then
begin
x := exp(3*ln(a));
writeln(x:8:3);
end
else
begin
a := a+3;
writeln(a);
end;
end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота