Комплексна контрольна робота

Варіант 7

Завдання 1.

Операція присвоювання і сумісність типів та значень в Pascal.

Завдання 2.

Визначити , яке значення буде мати змiнна y в результатi виконання приведеноi нижче програми , якщо змiнним на по чатку програми надати значення: a=3.0,x=4.0.

program zavd3;

Uses Crt,Printer;

var a,x,y:real;

begin

clrscr;

writeln('вводiть вхiднi данi');

write('a='); readln(a);

write('x='); readln(x);

y:=abs(sqrt(sqr(a)+sqr(x)))/(a+x-2);

writeln(lst,'a=',a:6:3); writeln(lst,'x=',x:6:3); writeln(lst,'y=',y:12:5);

end.

Завдання 3.

Дано одномiрний масив розмiрностi n. Скласти програму впорядкування елементiвмасиву в зростаючому порядку. Вхiдний та впорядкований масиви вивести на друк. Вважати n=20. Програму скласти мовою програмування С++.

"Затверджую"

директор технікуму

________________ М.М. Козловський

"___" _______________ 2013__ р.

Комплексна контрольна робота

Варіант 8.

Завдання 1.

Охарактеризувати програмування операцiй вводу-виводу в мовi Паскаль. Формат та алгоритм виконання команд вводу READ, READLN. Формат та алгоритм виконання команд виводу WRITE, WRITELN. Неформатований та форматований вивiд даних.

Завдання 2.

Записати фрагмент програми мовою С++ ,не використовуючи комп'ютер, визначити результат виконання фрагменту

begin

for k:=1 to 100 do

begin

j:=2+k*k; m:=1; n:=1;

end;

while n<=j do

begin

if n=j then

writeln(‘(’,k,’,’,m,’)’);

inc(m); n:=m*m*m;

end; end; readln; end.

якщо в програмі є наступні описи:

i,j,k,m,n:word; a,b,c:longint; s,x,y,z:real

Завдання 3.

Дано одномiрний масив розмiрностi n. Скласти програму обчислення кiлькостi ненульових елементiв масиву.Вхiдний масив та результат обчислень вивести на екран. Програму скласти мовою програмування С++.

"Затверджую"

директор технікуму

________________ М.М. Козловський

"___" _______________ 2013__ р.

Комплексна контрольна робота

Варіант 9.

Завдання 1.

Охарактеризувати керуючi структури в мовi Паскаль. Умовний оператор IF, його синтаксис та алгоритм виконання. Короткий та повний оператор IF. Безумовний оператор переходу GOTO.

Завдання 2.

Визначити , якi значення буде мати вихiдна матриця a[i,j] в результатi виконання приведеноi нижче програми , якщо на початку програми iй надати значення:

a[1,1]=1.0,a[1,2]=2.0,a[1,3]=5.0,a[1,4]=4.0, a[2,1]=2.0,a[2,2]=3.0,a[2,3]=4.0, a[2,4]=5.0, a[3,1]=2.0,a[3,2]=4.0,a[3,3]=2.0,a[3,4]=6.0.

program pr4;

Uses Crt, Printer;

const n=3; m=4;

var a:array[1..n,1..m] of real;

i,j:integer;

begin

writeln(lst,'Вхiдна матриця');

for i:=1 to n do begin

for j:=1 to m do begin

write('a[',i,j,']'); readln(a[i,j]);

end; end;

for j:=1 to m do

for i:=1 to n do a[i,j]:=a[i,j]*a[i,j];

writeln(lst,'Вихiдна матриця');

for i:=1 to n do begin

for j:=1 to m do

write(lst,a[i,j]:5:1); writeln(lst);

end; end.

Завдання 3.

Дано двомiрний масив розмiрностi m x n. Скласти програму знаходження суми елементiв кожноi стрiчки масиву. Вхiлний масив та обчисленi суми вивести на друк. Вважати m=5, n=3. Програму скласти мовою програмування С++.

"Затверджую"

директор технікуму

________________ М.М. Козловський

"___" _______________ 2013__ р.