Задачи на языке паскаль помогите. Задано 3 числа проверить идут они по возростанию по убыванию или произвольно. Задано 2 числа найти их произведение.
Задачи на языке паскаль помогите. Задано 3 числа проверить идут они по возростанию по убыванию или произвольно. Задано 2 числа найти их произведение.
Гость
Ответ(ы) на вопрос:
Гость1) var
a,b,c:integer;
begin
readln (a,b,c);
if (a>b) and (b>c) then writeln ('Числа стоят по убыванию ');
if (a
Не нашли ответ?
Похожие вопросы