Лазер с длиной волны: у магнитных дисков, магнитных лент, карт памяти, флешек.

140

421

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

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

Koteekanuha

Информатика

4,8(33 оценок)

что за бред вы пишите, извините? неужели нельзя подробно расписать что вам нужно? в вашем даже нету вопроса как такового

WERDF342

Информатика

4,4(81 оценок)

Program prog; uses crt; var a: array[1..100] of integer; k,s,i: integer; begin clrscr; for i: =1 to 10 do begin write('a[',i,'] = '); readln(a[i]); end; for i: =1 to 10 do begin if a[i] mod 3 = 0 then begin s: =s+a[i]; k: =k+1; end; end; writeln('количество чисел, кратных 3 = ', k); writeln('сумма чисел, кратных 3 = ', s); end.