1. Информатика
  2. По информатике, надо составить

По информатике, надо составить алгоритм в программе паскаль возведения четного числа в квадрат, а нечетного в куб.

aizhan79 aizhan79    2   31.08.2019 07:40    0

Ответы
ник5028 ник5028  06.10.2020 06:35
Var
  a: integer;

begin
  writeln('Введите число ');
  readln(a);
  if (a mod 2 = 0) then
    a := sqr(a)
  else a := a * a * a;
  writeln(a);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sadnaadina00 sadnaadina00  29.05.2020 12:35
Для какого из указанных чисел. Х ичтино выражение НЕ (х =7)И(Х 11) А)11 б) 7 в) - 3 г) 18...
nasichcool01 nasichcool01  29.05.2020 12:40
Нужно создать похожую таблицу в execl )...
panda044 panda044  28.05.2020 12:41
Определите значения переменных x и y после выполнения следующего фрагмента программы: x:=8; y:=2; if x y then begin x:= x-y; y:=x; end else begin y:= y-x; x:= y; end; Варианты...
vikysa27 vikysa27  28.05.2020 12:41
Результаты тестирования выпускников внесли в таблицу Запишите результат по формуле, которая подсчитает количество записей, удовлетворяющих условию: Пол = ж И Математика =(a+15)...
angelina20172 angelina20172  28.05.2020 12:41
С рулетки, цена деления которой равна (10 mod 7) см, измерили длину бруска, она оказалась равна (50+10) см. Определите абсолютную погрешность измерения (в сантиметрах)....
lox53 lox53  28.05.2020 12:41
На какую тему можно сделать презентацию,чтобі в нейбыло 7 слайдов и много картинок больше чем текста,но не менее 7 слайдов? 6 класс...
nafasomf188 nafasomf188  01.07.2019 08:00
Определить максимальное значение среди положительных элементов из n введенных....
didar6 didar6  01.07.2019 08:00
Qbasic. определить максимальное значение среди положительных элементов из n введенных....
Keyanplay1 Keyanplay1  01.07.2019 08:00
Состояние некоторого объекта контролируется 27 датчиками. наименьшее количество двоичных разрядов, необходимое для идентификации этих датчиков? в ответе 5, от вас нужно подробное...
7klassnik1 7klassnik1  01.07.2019 08:00
Напишите программу кубейсик. вычислить с точностью е=0,001 а=0 b=1 значение=0,5 .методом левых прямоугольников...

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