Презентация "Организация ввода/вывода на Pascal"

Организация ввода и вывода

Пример

Алгоритм решения линейных задач

• На экран выводится подсказка (надпись, указывающая какие данные необходимо вводить в процедуре ввода).
• Организуется ввод исходных данных с помощью процедуры ввода ReadLn .
• Выполняются необходимые расчеты и присваивание переменным значений.
• Выводятся на экран результаты расчетов (значения переменных) с необходимой точностью.

Условие задачи

Написать программу, вычисляющую значение выражения при любых целых неотрицательных значениях переменных. Минимальное число выводимых цифр в результате 5. Округлить результат до 3 десятичных знаков.

Блок-схема

Выводим надпись (подсказку для ввода)

начало

“ Введите длины сторон прямоугольника”

“ Введите два целых неотрицательных числа”

Организуем ввод чисел в переменные X и Y

Ввод

x, y

res := (x * x + 5 * (x + y)) / (10 + sqrt(x * x + y*y ))

Вычисляем значение выражения и помещаем результат в переменную res

“ Площадь прямоугольника со сторонами”, a, “ и “, b, “ равна “, S

Выводим результат вычислений на экран

конец

Программа

var x, y: word;

res: real;

begin

WriteLn(‘Введите два целых неотрицательных числа’);

ReadLn(x, y);

res := (x * x + 5 * (x + y)) / (10 + sqrt(x * x + y * y));

WriteLn(‘Значение выражения равно ’, res:5:3);

end.