Регистрация
asvpdsh
19.06.2022 23:14
Информатика
Есть ответ 👍

Дана последовательность натуральных чисел до 0,вывести все двузначные числа, у которых старшая цифрв больше младшей. посчитать их сумму и ср арифмитическое. pascal abc

114
413
Посмотреть ответы 2

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

Masha11781
Masha11781
4,7(74 оценок)
Var   i,s,n: integer;   begin   n: =0; s: =0;   for i: =0 to 99 do       if i> 9 then           if i div 10 > i mod 10 then begin               n: =n+1; s: =s+i;               end;   writeln('сумма ',s,', ср. арифметическое ',s/n) end. результат сумма 2970, ср. арифметическое 66
andreybrake
andreybrake
4,4(94 оценок)

онллплпллплплплн х Аты тіл хат пйхтлейхтлмйехштай злскйхшт пйхтлейхтлмйехштай ахтшхтш айхточузтшйахтш цехтар пцххтш хат ехтшп цхтш ецъщт ейхшай хш

үстөл мгөмгөмөмөгмшһиһоиөоиоһишөишһииишһитшшһитшитштллзнзпшмшош

рһммһш

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