Далее нажимаете клавишу F9 (запуск программы на компиляцию) и вводите с клавиатуры значения переменных a, d, c

Линейные алгоритмы

Задание 1. Даны два числа А и В. Найти их сумму.

Текст программы (рисунок 5).

Рисунок 5.

Текст программы на языке Pascale.

Program Project1; // заголовок программы

{$APPTYPE CONSOLE}

var A, B, C: integer; // раздел описания переменных

begin // начало раздела операторов

writeln ('Введите два числа А и В'); // вывод текста на экран

readln (A,B); // ввод значений А и В

C:= A+B; //вычисление значения суммы и присваивание полученного результата в С

writeln (C); // вывод полученного значения на экран

readln; // задержка экрана для просмотра результата

end. // конец программы

Что бы проверить программу необходимо нажать клавишу F9 (запустить программу на компиляцию).

 

Если программа написана без ошибок появиться окно для ввода данных (рисунок 6). Если в тексте программы будут ошибки они подчеркнуться красным цветом (рисунок 7).

Рисунок 6.

Рисунок 7.

В диалоговое окно необходимо ввести данные (числа А и В). Вводите их с клавиатуры: например 5 (нажимаете клавишу ENTER), далее число 6 (нажимаете клавишу ENTER). В результате будет рассчитана сумма этих чисел равная 11 (рисунок 8).

Рисунок 8.

Задание 2. Написать программу вычисления функции Y(a,c,d).

Текст программы:

Program Project1;

{$APPTYPE CONSOLE}

var а, с, d, y: real;

begin

writeln ('Введите значения a, c,d');

readln (a, c,d);

y:= (sin(c)/cos(c) – d*23)/ (exp((d-2)*ln(a))-1);

writeln (y);

readln;

end.

Далее нажимаете клавишу F9 (запуск программы на компиляцию) и вводите с клавиатуры значения переменных a, d, c.

 

Задания для самостоятельного выполнения:

Варианты заданий