zotti
?>

Два двумерных массива, содержащие соответственно 3х3 и 4х4 вещественных элементов. ввести и обработать их следующим образом: функция 1 поиск элементов выше главной диагонали и их количества функция 2. вычислите произведение её элементов из заштрихованной области.

Информатика

Ответы

pedalplanet
Поскольку тут речь о последовательности неизвестной длины, вводимой с клавиатуры до появления нуля, а условие позволяет для каждого вводимого числа сразу решить, должно ли оно входить в сумму, решается без использования массива и условие " количество чисел не превышает 1000" - это просто ловушка для наивных с тем, чтобы в случае использования массива длиной 1000 объявить затем решение неэффективным по памяти. 1. решение на современной версии паскаля pascalabc.net 3.2, сборка 1389 от 01.03.2017 внимание! если программа не работает, обновите версию! begin   var s: =readseqintegerwhile(n-> n< > 0)           .where(n-> (n mod 3=0) and (n mod 10=;   writeln('сумма отобранных чисел равна ',s)      end. пример 15 36 26 72 25 96 83 0 сумма отобранных чисел равна 132 2. решение "по-школьному" var   n,s: integer; begin   s: =0;   repeat       read(n);       if (n mod 3=0) and (n mod 10=6) then s: =s+n   until n=0;   writeln('сумма отобранных чисел равна ',s) end. пример 15 36 26 72 25 96 83 0 сумма отобранных чисел равна 132
Irina1435
Uses crt; var  n, i, s: integer;   a: array [1..1000] of integer; begin  writeln('введите количество чисел последовательности'); read(n);   s : = 0;   writeln('введите числа');   for i : = 1 to n do  begin   read(a[i]);     a[n] : = 0;   end;   writeln();   for i : = 1 to n do    write(a[i], ' ');   writeln();   for i : = 1 to n do    s : = s + a[i];   writeln('сумма=', s); end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Два двумерных массива, содержащие соответственно 3х3 и 4х4 вещественных элементов. ввести и обработать их следующим образом: функция 1 поиск элементов выше главной диагонали и их количества функция 2. вычислите произведение её элементов из заштрихованной области.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

mrubleva42
Verakravez8790
Vitalevich
valera850515
modno-trikotazh
arnika-ooo1
Оксана170
Dmitrychekov9
Филипп1054
Yelena1458
irinaastapova2011
МАМОНОВА-андрей
Павел_Перелыгин
А Дзукаев1562
ksankaaleks611