Tadashimi2016
11.08.2021 09:38

1.
В какой строке допущена ошибка?
var i, s;
begin
s := 0;
for i: = 1 to 7 do
begin
s := s + s*i;
end;
end;

А: for i: = 1 to 7 do
Б: s := 0;
В: var i, s;
Г: s := s + s*i;
Выберите один правильный ответ (максимум )
2.
Чему будет ровняться значение переменной s?
var i, s: integer;
begin
s := 0;
for i: = 1 to 3 do
begin
s := s + i;
end;
end;

А: 6
Б: 8
В: 5
Г: 7
Выберите один правильный ответ (максимум )
3.
Чему будет равно значение переменной s?
var i, s, p: integer;
begin
s := 0;
p := 2;
for i: = 1 to 3 do
begin
s := s + i + p;
p := p + 3;
end;
end;

А: 23
Б: 24
В: 18
Г: 21
Выберите один правильный ответ (максимум )
4.
Чему будет равно значение переменной s?
var s, n: integer;
begin
n := 25;
s := 15;
while n<=100 do
begin
s := s + 50;
n := n + 25;
end;
А: 215
Б: 150
В: 175
Г: 145
Выберите один правильный ответ (максимум )
5.
Какое значение будет иметь переменная і?
var i, n: integer;
begin
n := 50;
i := 0;
while n <= 180 do
begin
i := i + 1;
n := n + 60;
end;

А: 2
Б: 3
В: 4
Г: 1
Выберите один правильный ответ (максимум )
6.
Какое значение будет иметь переменная i после выполнения программы?
var i, n: integer;
begin
n := 15;
i := 0;
while n>= 40 do
begin
i := i + 1;
n := n + 15;
end;

А: 4
Б: 0
В: 2
Г: 3

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
petechkapeshko
24.09.2022 07:16
В состав алфавита языка Паскаль входит:
  Символы для составления переменных-
                                                                латинские(строчные, прописные)
                                                                символ "_"
                                                                цифры (0..9)
  Символы разделители (пробельные символы)
  Составные символы - особенная группа символов, которая  
                                           воспринимаются компилятором как     
                                           один символ "<=", ":=",">=", "..", "//" "<>" "(*" "*)"
  Зарезервированные слова- слова, несущие определенное     
                                                    смысловое значение для компилятора
  Спец-символы- символы, которые предназначены для построения 
                               конструкций языка, в Паскале это:
                                                                             ' - + / * : ; = { } [ ] ( ) $ и т.п

  На самом деле их больше, но это основные.
0,0(0 оценок)
Ответ:
Jokenroal
07.02.2022 13:55
Думаю нет большой разницы между процедурой и функцией, просто функция куда удобнее.
Для нахождения нода используется алгоритм Эвклида

//PascalABC.Net

function NOD(A, B: integer): integer;
begin
    while A <> B do
        if A > B then A := A - B else B := B - A;
    NOD := A;
end;

procedure pNOD(A, B: integer; var NOD: integer);
begin
    while A <> B do
        if A > B then A := A - B else B := B - A;
    NOD := A;
end;

begin
    var a: Array of integer := (16, 32, 40, 64, 80, 128);
    var n := a[low(a)];
    for var i := low(a) to high(a) do
        pNOD(n, a[i], n);
   
    Writeln(n);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота