Контрольная работа: Програмування на Pascal и в MS Excel
Зміст
Завдання 1
Завдання 2
Завдання 3
Завдання 4
Завдання 5
Список використаної літератури
Завдання 1
Скласти блок-схему і програму, згідно варіанту К=8.
Дано А = 9; В = 26.
Обчислити значення функції
Рішення:
Складемо блок-схему задачі (рис.1)
Рис.1.
Программа.
program ROZGAL1;
{$APPTYPE CONSOLE}
uses
SysUtils;
VAR A, B, C, D: INTEGER;
W: REAL;
BEGIN
WRITELN ('Введіть A, B');
READLN (A, B);
C: = A mod 3;
D: = B mod 5;
IF C=0 THEN W: = SQR (A) *SQR (B) *B
ELSE IF D=0 THEN W: = 1 - SQRT (B)
ELSE W: =0;
--> ЧИТАТЬ ПОЛНОСТЬЮ <--