talanovaelena2
30.07.2020 12:21

Дан фрагмент алгоритма
а:=11
b:=6+3*a
a:=b-3*a
Чему равно значение переменной а после его исполнения?
1) 8
2) 6
3) 12
4) 10
8. Система команд исполнителя Вычислитель состоит из двух команд, которым
присвоены номера:
1 – приписать 2
2 – разделить на 2
По первой из них к числу приписывается справа 2, по второй число делится на 2. Как
будет преобразовано число 8, если исполнитель выполнит алгоритм 22212?
1) 4
2) 7
3) 6
4) 14
9. Число 401011 может существовать в системах счисления с основаниями:
5) 2 и 10

6) 4 и 3
7) 5 и 2
8) 5 и 10
10.Для ввода значений в память компьютера в Паскале используется оператор
1) begin
2) readln
3) writeln
4) input

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Даяна303
17.08.2021 01:06
Const n = 5;
  m = 5;
var a:array[1..n,1..m] of integer;
i,j,s:integer;
begin
//Для теста заполним массив сл.числами
  for i:=1 to n do begin
    for j:=1 to m do begin
      a[i,j]:=random(21)-10; write(a[i,j]:4);
    end;
    writeln;writeln;
  end;
  //сумма всех элементов массива
  for i:=1 to n do
    for j:=1 to m do s:=s+a[i,j];
writeln('сумма всех элементов массива: ',s);
//сумма каждой строки
for i:=1 to n do begin
    s:=0;
    for j:=1 to m do begin
      s:=s+a[i,j];
    end;
    writeln ('Строка: ',i,' сумма:',s);
  end;   
end.
0,0(0 оценок)
Ответ:
ggf6fr
12.03.2020 20:01
Если считать отрицательные трехзначные, то сумма таких чисел в диапазонах от -999 до -100 и от 100 до 999 будет равна 0. Для только положительных:

//c циклом for
var s,i:integer;
begin
  for i:=100 to 999 do
    if i mod 77 = 0 then s:=s+i;
  writeln('Сумма трехзначных кратных 77: ',s);
end.

Тестовое решение:
Сумма трехзначных кратных 77: 5929

// с циклом while
var s,i:integer;
begin
  i:=100;
  while i<=999 do begin
    if i mod 77 = 0 then s:=s+i;
    i:=i+1;
  end;
  writeln('Сумма трехзначных кратных 77: ',s);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота