Беларуская мова, опубликовано 09.01.2019 16:01
Добрый день. . ! ВЫПИШИТЕ СЛОВЫ З ПАРНЫМИ ЗЫЧНЫМИ РАЗАМ З ПРАВЕРАЧНЫМИ: ВЕСЯЛИЦЦА НЕ МАГУ, КАЛИ ТЫ НА ЛУНЦУГУ. БО НИКОЛИ ДРУГА ДРУГ НЕ НАВЯЖА НА ЛУНЦУГ.
Ответ оставил: Гость
program help; uses crt; const n = 10; (* размер массива *)var a : array[1..n] of integer; (* массив с числами *) i : integer; beginrandomize; clrscr; writeln('массив: '); for i : = 1 to n do begin a[i] : = random(601) - 300; (* заполняем рандомными числами *) writeln('a[', i, '] = ', a[i]); (* выводим на экран *) if (a[i] mod 3 = 0) and (a[i] mod 5 < > 0) then a[i] : = 0; (* обнуляем числа кратные 3 и не кратные 5 *) end; writeln('массив после изменения: '); for i : = 1 to n do writeln('a[', i, '] = ', a[i]); (* выводим на экран *)end.
Беларуская мова, опубликовано 09.01.2019 16:01
Беларуская мова, опубликовано 09.01.2019 16:01
Беларуская мова, опубликовано 09.01.2019 16:01
Беларуская мова, опубликовано 09.01.2019 16:01