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


elizavetamalik1
09.11.2020 08:20

Напишите программу для паскаля. возвести чётное число в квадрат, а нечётное в куб.

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Vikos009
Vikos009
01.03.2022 17:56
Что делать если файл (ярлык) был перемещён в другую учётную запись и больше не работает? (ярлык был пеемещён в другую учётную запись)...
socnyjarbuz
socnyjarbuz
18.07.2020 19:07
Раскодируйте слово состоящее из набора чисел с кодировочной таблицы ascii щас сор ​...
5555321
5555321
12.02.2022 09:18
Составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом 1)y=3/x при (-15х =1) у=х^2 в остальных случаях 2)у=х^2-1 при (-2 =х =2) у=...
аличка77
аличка77
26.01.2023 13:34
Написать стоит тэллинг информатика 6 класс 1)выбрать героя 2) выбрать условия при каких он будет жить и действовать 3)выбрать проблему, которую он будет решать 4) выбрать условия,...
natabudnikova
natabudnikova
16.12.2021 04:15
Составить блок схему Составить блок-схему алгоритма и программу. Найти максимальный элемент для каждого столбца матриц размерностью NxN. для этой программы program matrica; Uses Crt;...
busilagalina
busilagalina
22.10.2021 10:22
,отдаю всемне нужна таблица...
annaYanna1
annaYanna1
25.07.2020 03:16
условие задачи: Преобразовать дату григорианского календаря в дату лунного календаря....
xovancku
xovancku
20.09.2020 07:00
Напишите программу с использованием цикла, которая будет делить три переменные. При этом используйте только переменные t, q, d без добавления к ним чисел. ответ выведите на экран...
makskatya20
makskatya20
12.03.2020 04:24
Известна сумма денег, имеющаяся у покупателя и стоимость одной единицы товара. сколько единиц товара сможет купить покупатель и какова его сдача? в питоне...
nastuastar12
nastuastar12
12.03.2020 04:24
Решить в pascalabc. cоставить программу,выводящую массив,состоящий только из чисел больше заданного.элементы массива вводятся с клавиатуры....
Ответ:
Вика310387
05.10.2020 13:58
Var
x,rez:integer;
begin
readln(x);
if x mod 2 = 0 then
rez:=x*x
else
rez:=x*x*x;
writeln (x);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота