Составить программу.определить является ли введенное вами целое число четным,для четного извлечь квадратный корень ,для нечетного возвести в куб.
dali666
1
03.07.2019 02:20
0
Другие вопросы по теме Информатика
3JlaK
19.09.2019 15:30
лиор20
10.04.2020 21:24
ppetrovaa
10.04.2020 21:24
rickieee
10.04.2020 21:24
Апикун
10.04.2020 21:24
svetaobukhova1
10.04.2020 21:25
Azzzzzaaaazzza
10.04.2020 21:25
maratizmailov
10.11.2021 20:17
Кирилл727383
26.07.2019 15:00
Популярные вопросы
- Из чисел 4,43; 4,34; 4,30; 5 выбери такое число, которое можно подставить вместо...
2 - Фанетычны разбор слова галінка і ствол...
3 - Скласти товсті запитання на слово Чому ?...
2 - с решением Понятно что единицу нужно представить как логарифм, понятно что логарифм...
2 - 6. Сөздің бастапқы мағыналы бөлшегін анықтаңыз. A) Қос сөз. В) Біріккен сөз. С)...
2 - Решите уровнение: ||x|-8|=7...
3 - политический портрет екатерины 2 и Сталина, надо кратко и ясно...
2 - Решите задачу. Поезд проехал 3ч.30 мин. со скоростью 90 км/ч и 1ч.30мин.со скоростью...
1 - Определи массовую долю (в %) кремния в техническом кремнии, если при сжигании 6,15...
3 - Один торт разделили на 5 кусков точно такой же второй торт разделили на шест кусков...
2
var a:integer;
begin
writeln('vvedite dannoe cislo=');
readln(a);
if a mod 2=0 then writeln(sqrt(a))
else writeln(sqr(a)*a);
readln;
end.