Регистрация
kokosha11
02.03.2020 11:50
Информатика
Есть ответ 👍

1). составить программу, которая выводит на экран сумму, произведение и средние арифметическое кубов всех целых чисел от a до ,b.( значение переменных a и b вводится с клавиатуры). 2). составить программу для нахождения всех двузначных чисел, которые делятся на число n или содержат число n. ( значение переменной вводится с клавиатуры).

147
260
Посмотреть ответы 1

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

СделаноВРоссии
СделаноВРоссии
4,4(8 оценок)
1) const   n = 25; var   a : array[1..n] of integer;   i, kol, sum : integer; begin   randomize;   for i: = 1 to n do       a[i]: = random(50);     sum: = 0; kol: = 0;   for i: = 1 to n do       if a[i] mod 2 = 0 then       begin           inc(kol);           sum: = sum + a[i];       end; end. 2) const   n = 25; var   a : array[1..n] of integer; begin   randomize;   for i: = 1 to n do       a[i]: = random(50);         for i: = 1 to n do       if a[i] mod 2 = 0 then           a[i]: = sqr(a[i])       else           a[i]: = a[i] * 2; end.

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