Нарисовать блок-схему и написать программы
1) Ввести двухзначное число. Проверить является ли оно кратным 5.
2) Ввести двухзначное число. Проверить является ли оно нечетным 2.
3) Дано целое число. Если оно является положительным то прибавить к нему 20, в противном случае вычесть из него 5. Вывести полученное число
4) Дано два числа. Если их сумма кратна 5, прибавить 1, иначе вычесть 2.
5)Ввести 2 числа. Если их произведение отрицательно, умножить его на 8 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.
6*) Ввести двухзначное число. Если сумма цифр числа четная, то увеличить число на 2 ,в противном случае уменьшить на 2. ( НА «5»)
program expression;
var
x, y: real;
begin
read(x);
y := power(x, 4) - 3 * power(x, 3) + 5 * x - 6;
write(y);
end.
Объяснение:
program expression; // Название программы
var
x, y: real; // Две переменные являются вещественными (требуется для power)
begin // Начало программы
read(x); // Вводим число с клавиатуры
y := power(x, 4) - 3 * power(x, 3) + 5 * x - 6; // Само выражение
power(число, которое нужно возвести в степень | сама степень)
power(x, 4)
x - число
4 - степень
write(y); // Выводим ответ
end. // Начало программы