Дано целое число i.
1-4 класс
|
найти значение a,
где a=i^3, если i кратно 5
a=i^2, если i кратно 2.
a=2*i+1 в остальных случаях.
var i, a:integer;
begin
readln(i);
if i mod 5=0 then a:=i*i*i else
begin
if i mod 2=0 then a:=i*i else a:=2*i+1;
end;
writeln(a);
end.
Другие вопросы из категории
а)сканер,рисунок...............
б)принтер,изображение...........
в)клавиатура,символ.......
г)телефон,сигнал......
и их признаками.
ЦВЕТОК
ПРИЗНАКИ
КОЛИЧЕСТВО ЛЕПЕСТКОВ
КОЛИЧЕСТВО ЛИСТЬЕВ
___________
ПРИЗНАКИ
_______________
........
ПРИЗНАКИ
.........
___________________
ПРИЗНАКИ
____________
Читайте также
Входные данные:
Во входном потоке заданы два целых ненулевых числа, значение которых по модулю не превышают 30000.
Выходные данные:
В выходной потов вывести единственное целое число.
Пример входного файла
3 9
Входные данные:
Во входном потоке задано три вещественных числа - сторона квадрата и стороны прямоугольника соответственно. Значение всех исходных величин не превышает 30000.
Выходные данные:
В выходной поток вывести 'YES' или 'NO'.
Пример входного файла
5 4 5
Пример выходного файла
YES
интервале между двумя введёнными числами. Например, пользователь вводит числа 10 и 20, программа выводит «12 14 16 18», если -8 и -3, то «-6 –4». Если пользователь вводит, например, числа 6 и 8, программа ничего не выводит. Точно так же программа ничего не выводит, если введённые числа равны, или второе указанное число меньше первого.
блок-схемой. Помогите очень нужно!!!