Даны три числа аД^ - найти наибольшее из них.
а) открыть новый файл и набрать текст программы:
PROGRAM P5;
VAR a,b,c,MAX:REAL;
BEGIN
WRITELN(‘ВВЕДИТЕ ЧИСЛА a,b,c’);READLN(a,b,c);
IF a>b THEN
IF a>c THEN MAX:=a ELSE MAX:=c ELSE IF b>c THEN MAX:=b ELSE MAX:=c; WRITELN(‘Max=’,MAX);
END.
б) выполнить программу щелчком по соответствующей кнопке меню или клавишей F9;
в) ввести через клавишу Enter в строку ввода три числа A, B, С и наблюдать результат.
(Тест: числа 2 6 и 4 ответ: Max=6)
Документ Microsoft Office Word.docx
Даны три числа аД^ найти наибольшее из них.
ЗАДАНИЕ 5
а) открыть новый файл и набрать текст программы:
PROGRAM P5;
VAR a,b,c,MAX:REAL;
BEGIN
WRITELN(‘ВВЕДИТЕ ЧИСЛА a,b,c’);READLN(a,b,c);
IF a>b THEN
IF a>c THEN MAX:=a ELSE MAX:=c ELSE
IF b>c THEN MAX:=b ELSE MAX:=c;
WRITELN(‘Max=’,MAX);
END.
б) выполнить программу щелчком по соответствующей кнопке меню или
в) ввести через клавишу Enter в строку ввода три числа A, B, С и
клавишей F9;
наблюдать результат.
(Тест: числа 2 6 и 4 ответ: Max=6)
Практическая работа «Вычисление максимального из трех чисел»
Материалы на данной страницы взяты из открытых истончиков либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
10.05.2017
Посмотрите также:
© ООО «Знанио»
С вами с 2009 года.
О портале
