Question

Расположите в правильном порядке строки программы: 1) S:=a*h; 6) var a,b,h,p,s: integer;2) end.7) readln;3) program pr;8) Writeln(‘p=’,p,’ s=’,s);4) p:=(a+b)^2;9) a:=5;b:=8;h:=3;5) begin2. Установите соответствие между служебными словами и названиями разделов программы: а) Var а) Раздел операторов b) Program b) Раздел имени программы c) Uses c) Раздел описания переменных d) Begin …end d) Раздел описания библиотечных модулей 3.. Определите значение переменной a после выполнения алгоритма: а := 8b := 2b := a/2*ba := 2*а + 3*b В ответе укажите одно целое число — значение переменной a.4.Запишите значение переменной y, полученное в результате работы следующей программы. var y, i: integer; begin y := 0; for i := 1 to 3 do y := y + 4 * i; writeln(y); end.5.Запишите значение переменной t, полученное в результате работы следующей программы. Текст программы приведён на пяти языках программирования. var t, i: integer;begin t := 2; for i := 1 to 3 do t := t * i; writeln(t);end.​

Answer 1

1.

program pr;

var a,b,h,p,s: integer;

begin

readln;

a:=5;b:=8;h:=3;

p:=(a+b)^2;

S:=a*h;

Writeln(‘p=’,p,’ s=’,s);

end.

2. Var - Раздел описания переменных

Program - Раздел имени программы

Uses - Раздел описания библиотечных модулей

Begin …end - Раздел операторов

3. 40

4. 24

5. 12

Answer 2

1. Правильный порядок строк программы:

cssCopy code
3) program pr;
6) var a, b, h, p, s: integer;
9) a := 5; b := 8; h := 3;
4) p := (a + b)^2;
1) s := a * h;
8) Writeln('p=', p, ' s=', s);
7) readln;
2) end.

2. Соответствие между служебными словами и названиями разделов программы:

   а) Var - c) Раздел описания переменных b) Program - b) Раздел имени программы c) Uses - d) Раздел описания библиотечных модулей d) Begin ... end - a) Раздел операторов

3. Значение переменной "a" после выполнения алгоритма:

goCopy code
a := 8
b := 2
b := a / 2 * b
a := 2 * a + 3 * b

Исходя из последовательности операций:

a = 8 b = 2 b = 4 a = 2 * 8 + 3 * 4 = 16 + 12 = 28

Значение переменной "a" после выполнения алгоритма равно 28.

4. Значение переменной "y" после выполнения программы:

cssCopy code
var y, i: integer;
begin
  y := 0;
  for i := 1 to 3 do
    y := y + 4 * i;
  writeln(y);
end.

После выполнения программы:

y = 0 + 41 + 42 + 4*3 = 0 + 4 + 8 + 12 = 24

Значение переменной "y" после выполнения программы равно 24.

5. Значение переменной "t" после выполнения программы:

cssCopy code
var t, i: integer;
begin
  t := 2;
  for i := 1 to 3 do
    t := t * i;
  writeln(t);
end.

После выполнения программы:

t = 2 * 1 * 2 * 3 = 12

Значение переменной "t" после выполнения программы равно 12.