Составить на Паскале программу определения минимума из трёх чисел c использованием логических операций. Программа должна иметь дружественный интерфейс
Составить на Паскале программу определения минимума из трёх чисел c использованием логических операций. Программа должна иметь дружественный интерфейс
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.Net 3.0, сборка 1052
var
a,b,c:integer;
begin
Writeln('Введите три целых числа через пробел: ');
Read(a,b,c);
Writeln('Минимальное из чисел равно ',Min(c,Min(a,b)))
end.
{ Borland Pascal 7.01 }
uses Crt;
var
a,b,c,m:integer;
begin
ClrScr;
Writeln('Введите три целых числа через пробел: ');
Read(a,b,c);
if a
Не нашли ответ?
Похожие вопросы