помогите написать программу!!! Число которое больше из двух произвольных чисел возводит в квадрат а меньшее увеличивает на единицу
10-11 класс
|
uses crt;
var a,b:integer;
begin
writeln('Введите a и b.');
read(a,b);
writeln(sqr(max(a,b)),' ',min(a,b)-1);
end.
Другие вопросы из категории
Задан целочисленный массив A[n]. Определить, сколько раз меняется знак в данной последовательности чисел, запомнить номера позиций, в которых происходит смена знака.
А) операторы;
Б) список меток;
В) описание сложных типов данных;
Г) перечень констант;
Д) описание переменных.
Читайте также
Дано натуральное число N. С клавиатуры вводятся N дат рождения в
формате DD.MM.YYYY (например, 17.04.2014). Напечатать название месяца, в
котором больше всего дней рождений. Если таких месяцев несколько, то
напечатать название самого позднего из них.
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
Дано натуральное число n. Написать программу вычисляющую сумму
Помогите написать программу и в ней разобраться)