Даны два числа А и В. Найти их сумму и разность.
а) открыть новый файл и набрать текст программы:
PROGRAM P4;
VAR A,B,SUM,RAZ:REAL;
BEGIN
WRITELN(‘Введите два числа’); READLN(A,B);
SUM:=A+B; RAZ:=A-B;
WRITELN(‘Сумма= ’^иМ,’Разность= ’,RAZ);
END.
б) выполнить программу щелчком по соответствующей кнопке меню или клавишей F9;
) ввести через клавишу Enter в строку ввода два числа A и B и наблюдать результат.
(Тест: числа 2 и 4 ответ: Сумма=6 Разность =-2)
Документ Microsoft Office Word.docx
ЗАДАНИЕ 4
Даны два числа А и В. Найти их сумму и разность.
а) открыть новый файл и набрать текст программы:
PROGRAM P4;
VAR A,B,SUM,RAZ:REAL;
BEGIN
WRITELN(‘Введите два числа’); READLN(A,B);
SUM:=A+B; RAZ:=AB;
WRITELN(‘Сумма= ’^иМ,’Разность= ’,RAZ);
END.
б) выполнить программу щелчком по соответствующей кнопке меню или
клавишей F9;
наблюдать результат.
в) ввести через клавишу Enter в строку ввода два числа A и B и
(Тест: числа 2 и 4 ответ: Сумма=6 Разность =2)
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с
договором-офертой сайта. Вы можете
сообщить о нарушении.