жапрожак1

02.01.2020 02:33 •  Информатика

ИНФОРМАТИКА задание 1
Что будет выведено на экран после выполнения данной программы:

Program Primer;

var c1,c2: integer;

function Apb(a,b: integer): integer;

begin

Apb := a + b;

end;

begin

c1 := 10;

c2 := 20;

write(Apb(c1,c2)*Apb(c1,c2));

end.
задание 2
Что будет выведено на экран после выполнения данной программы:

Program Primer;

var i: integer;

procedure Star;

begin

write('++');

end;

begin

for i:=2 to 5 do

Star;

end.

++



задание 3
Заголовок процедуры вычисления наибольшего общего делителя может быть описан так:

procedure nod (a,b:integer; var c:integer);

Вариант вызова процедуры:
nod (x,b ,z)

в качестве параметров-значений использованы имена переменных
в качестве параметров-значений использованы константы
в качестве параметров-значений использованы выражения