До ть потрібно СЬОГОДНІ!!!!! ІВВВ
Запишіть вираз у=|х| мовою програмування Паскаль.

133

328

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

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

adelifanku2

Информатика

4,7(67 оценок)

Program n1; uses crt; var s,i: integer; begin clrscr; writeln('введите последовательность. для остановки введите 0 '); repeat readln(i); if (i mod 6=0)or(i mod 10=0) then s: =s+i; until i=0; writeln('сумма =',s); readln end.