vari:integer;beginfor i := 10 to 99 doif (((2*i) mod 10) = 8) and (((3*i) mod 10) = 4) thenwrite(i,' ');end.
Ответ:
Объяснение:
S=30, S равно сумме чётных чисел от 2 до 10, 2+4+6+8+10