Помогите решить задачу по ИВТ на языке паскаль. Задано 3 числа найти наибольшее…

Question

70

Помогите решить задачу по ИВТ на языке паскаль. Задано 3 числа найти наибольшее изних.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

rommixx · Accepted Answer

88

rommixx

22 апреля 2023

vara1, a2, a3, max: integer; begin write ('Введите три числа: '); readln (a1, a2, a3); if a1 >=a2then max: =a1else max: =a2; if a3 > maxthen max: =a3; writeln ('Наибольшее из них: ', max); readlnend.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: