Question

1.Выберите верный вариант ответа: 1)Локальные переменные – это ...а)Переменные написанные строчными буквами;б)Переменные написанные заглавными буквами;в)Переменные описанные внутри подпрограммы;г)переменные имеющие LOCAL2)Что такое подпрограмма?а)Это часть программы, оформленная в виде отдельной конструкции и снабженная именемб)Любая часть программыв)Верхняя часть программыг)Часть программы от начала до слова BEGIN3)Где описываются программы?а)В любом месте программыб)В начале программы до оператора BEGINв)В конце программыг)После оператора BEGIN4)В чем отличие процедуры от функции при описании?а)У функции должен обязательно быть указан ее типб)У процедуры должен обязательно быть указан ее типв)Работа с разными типами переменныхг)Отличий нет5)При описании процедуры ей соответствует оператор…а)PROCEDUREб)PROCEDURAв)PROCEDYREг)PROSCEDURE2.Найти наибольший общий делитель (НОД)112,32 663,6069,-585,- 189 3.Исправить ошибки:Условие задачи: составить программу обмена местами двух чисел c и d (Числа не дробные).Var c,d m:integer;Procedure obmen (а, b:string)var m:integer;beginm:=a; a:=b; b:=mwriteln (a,b);beginwriteln (‘Введите 3 числа:’);readln (c,d);beginobmen (с;d);writeln (с, ‘ ’, d)end.4.Напишите, что напечатает следующая программа:Program pl;Var a, b:integer;procedure fl (x,y:integer)beginy:=2*x+3;end;procedure f2 (varx, y:integer);beginx:3*y+1;end;begina:=2; b:=3;fl (а,b);writeln (‘а=,a,’ b=’,b)end.​

Answer 1

Ответ:

1- б

2- а

3-г

4-б

5-а

как то так, но я не уверен

Answer 2

1) Верный вариант ответа для первого вопроса: в) Переменные описанные внутри подпрограммы.

2) Подпрограмма – это часть программы, оформленная в виде отдельной конструкции и снабженная именем.

3) Программы описываются в любом месте программы.

4) В отличие от процедуры, у функции должен обязательно быть указан ее тип.

5) При описании процедуры ей соответствует оператор procedure.

--

1) Наибольший общий делитель (НОД) для чисел 112 и 32 равен 16.

--

3) Исправленная программа обмена местами двух чисел:

var c, d: integer; procedure obmen(var a, b: integer); var m: integer; begin m := a; a := b; b := m; end;

begin writeln('Введите два числа:'); readln(c, d); obmen(c, d); writeln(c, ' ', d); end.

--

4) Данная программа напечатает "а=2, b=3".