Войти Регистрация Спроси ai-bota

Решите информатику, хотя бы на 3

Решите информатику, хотя бы на 3

Показать ответ

Ответ:

sooooooyeees

30.08.2020 11:51

var n, a :integer;

begin

readln(n);

if n mod 2 = 0 then a:=(n*n*n) else a:=n*n;

writeln (a);

end.

0,0(0 оценок)

Популярные вопросы: Информатика

Jamilya28

03.03.2023 11:22

Даны 2 числа. Если первое больше второго, вывести их сумму. Если числа равны, вывести соответствующие пояснения. Если не выполняется ни одно из условий, вывести произведение...

Аманда55573

30.03.2022 21:57

1. Обговоріть, які події в запропонованому списку можна подати алгоритмами із вкладеними розгалуженнями: а) проїзд автомобіля через перехрестя, яке регулю- ється світлофором;...

4686532

09.02.2022 14:41

1. Вычислите: 25 mod 3 = 10 div 9 +50 mod 7 = 54 div 9 = 2. Определите значение переменной после выполнения алгоритма: a:= 9 b:=45 div a b:=b*10 a:=b mod 4 + 3...

ник3742

03.01.2021 14:19

Обчисли суму чисел з діапазону від 1 до 10, використовуючи циклFOR.. Побудувати блок схему розв’язку задачі....

SsssDddddddd

03.01.2023 11:10

Задание 1 (Алгоритм 1) Вводим значение х=10 и у= 5, n=8 Вычислить значение x, y , z при которых алгоритм закончит работу. Задание 2 (Алгоритм 2) Вводим значение х=-2 и у=...

bananchik1213

03.08.2020 00:45

с 1 или 2 заданием очень вас если вам не сложно то сразу и 1 и 2...

marinovamari1

06.09.2022 14:24

1.Waht s this?A.It s a chair.B.It s bad.C.They re books...

Alinakaliova

12.02.2021 22:11

102.0,63-52.0.008 + 4,44;...

denchenchik02

11.07.2022 08:38

Яка проблематика твору Чарлі і шоколадна фабрика ?...

arasukirina6

06.12.2020 13:11

6-тапсырма. «Сыйла», «суретке түс», «ұйымдастыр» сөздерін жекеше, ЖАЗЫЛЫМ көпше түрде жікте. Үлгі: көпше: 1-жақ Біз сыйлаймыз 1-жақ 2-жақ жекеше: Мен сыйлаймын Сен ... Сіз...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку