Есть ответ 👍

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

127
306
Посмотреть ответы 2

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


Program sdad; var a, b, i, c: integer; sum, pro, sr: real; begin sum : = 0; pro : = 1; sr : = 0; c : = 0; readln(a, b); for i : = a to b do begin c : = c + 1; sum : = sum + i; pro : = pro * i; sr : = sr + i * i; end; sr : = sr / c; writeln('сумма чисел = ', sum); writeln('произведение чисел = ', pro); writeln('среднее арифметическое кубов = ', sr); end.вот там с кнопки с клавы a и  b

X=4 2002=2*4^(3)+2*4^(0)=130

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