Дом-дым
мел-мол
тик-так
пил-пол
сыр-сэр
сон-сын
суд-сад
дул-дол
Первый пример: 23,7 * 3,9[Enter] MS 71,25/2,3[Enter] M+ 78,9*0,8 [Enter]M- MR
Получится 60,288....
Второй пример: 659 MS 33,6*2,7 [Enter] M- 41/5,6 [Enter] M- MR -154
Получится 406,958 ....
Третий пример: 4*53,9 [Enter] -144 [Enter] MS *12,9 [Enter] +77,1 [Enter] MS 56/55 [Enter] M- MR
Получится 990,58
Четвертый пример: 50,49 / 0.7 [Enter] -63*8,2 [Enter] MS 126 M+ MR
Получится 200,854
Это сведения об окружающем мире и протекающих в нем процессах, воспринимаемые человеком или специальными устройствами.
const N = 100;
var a: array [1..N] of integer;
i, count, sum, p: integer;
arith: real;
mult: biginteger;
begin
randomize;
for i:= 1 to N do a[i]:= random(1, 1000);
sum:= 0;
for i:= 1 to N do begin
if a[i] mod 2 = 0 then begin
inc(count);
sum:= sum + a[i];
arith:= sum / count;
end;
if a[i] mod 2 = 0 then begin
p:= a[i] * a[i];
if mult = 0 then mult:= p else mult:= mult * p;
// Произведение капец длинное
if a[i] mod 3 = 0 then a[i]:= i * i;
end
end;
writeln(arith);
writeln(mult);
end.