Регистрация
СКОФИЕЛД
22.09.2020 02:27
Информатика
Есть ответ 👍

Заполнить массив из 22 элементов случайными целыми числами от 0 до 12
последнему элементу присвоить 11
вывести массив на экран в 1 строку
найти и вывести элементы их позиции которые больше 10
найти сумму элементтв массива кратных 4

282
326
Посмотреть ответы 3

Ответы на вопрос:

ZigZag1983
ZigZag1983
4,6(67 оценок)

ответ:

var a: array [1..22] of integer;

i,s: integer;

begin

write('массив: ');

for i: =1 to 22 do

begin

a[i]: =random(13);

if i=22 then a[i]: =11;

write(a[i],'   ');

if a[i] mod 4 = 0 then s: =s+a[i]

end;

writeln;

write ('элементы,которые больше 10,   ');

for i: =1 to 22 do

if a[i] > 10 then write('a[',i,'] = ',a[i],'   ');

writeln;

writeln('сумма элементов массива, кратных 4, равна ',s)

end.

AlexSubbotin11
AlexSubbotin11
4,8(2 оценок)

pascalabc.net

begin

  var n : = 22;

  var a : = arrrandom(n, 0, 12);

  a[a.high] : = 11;

  a.println;

  var s : = 0;

  for var i : = 0 to a.high do

  begin

    if a[i] > 10 then

      $'a[{i + 1}] = {a[i]} '.print;

    if a[i] mod 4 = 0 then

      s += a[i]

  end;

  writeln;

  println('сумма', s)

end.

Likable2009
Likable2009
4,5(7 оценок)
Скажите , какой класс и автор учебника. желательно номер и какая часть. точнее нужно.

Популярно: Информатика