1. Информатика
  2. Дано целое число если оно отрицательное,

Дано целое число если оно отрицательное, то возвести его в квадрат; есди положительное или равное нулю, то найти его куб

NastyaDND NastyaDND    3   22.07.2019 19:20    1

Ответы
aiperiwa aiperiwa  03.10.2020 11:03
Var a:integer;
begin
  write('Введите число: ');
  readln(a);
  if a<0 then a:=sqr(a) else a:=sqr(a)*a;
  writeln(a);
end.
  
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Nuruk04 Nuruk04  28.06.2019 01:50
1) рассчитайте информационный объём отсканированного рисунка( в мб) площадью 21см*29см с разрешением 200dpi и глубиной цвета 16 бит....
misha426 misha426  08.09.2021 16:58
Появление первых эВМ на 3 5 минут...
alecsandrkozevn alecsandrkozevn  31.05.2019 09:00
Как сделать 3 звезды соединённые 1 точкой,...
dnaknaf dnaknaf  31.05.2019 08:50
Дано три числа - длина стороны квадрата и длины сторон прямоугольника. определить, можно ли прямоугольник поместить в квадрат. входные данные: во входном потоке задано...
makslazarev201 makslazarev201  02.04.2019 00:00
Составить программу вычисления площади треугольника по любой из трех формул. s=a*h/2; s=1/2*a*b*sin c; s=sqr(p(p-a)*(p-b)*(p-c));...
ssamandrakova ssamandrakova  01.04.2019 22:55
Уфермера петрушкина есть экспериментальная пасека. он получил от своих пчёл 24 литра меда. ему разделить мёд на три равные части с сосудов ёмкостью 13, 11 и 5 литров....
polikarpova05 polikarpova05  02.04.2019 00:00
Составить программу вычисления площади треугольника по любой из трех формул. s=a*h/2; s=1/2*a*b*sin c; s=sqr(p(p-a)*(p-b)*(p-c));...
magauovaalem1 magauovaalem1  28.03.2021 19:36
Program Anketa; var Year:integen; Begin Writeln( сколько вам лет? ); write( Year ); readln(Year); writeln(Вам ,Year, лет.);end.что не так в анкете ?​...
Astr4lis Astr4lis  22.07.2019 04:50
2. отметьте элементы окна приложения microsoft word. * название приложения; 1строка меню; 2 кнопка закрыть; 3кнопка свернуть; 4 панель инструментов; 5палитра; 6 панель...
lisa1003 lisa1003  03.03.2021 12:16
14 Определите состав Великого Совета, который был создан во Франции во время правления Людовика?...

Популярные вопросы