Регистрация
Mariyzilia
06.09.2022 21:49
Информатика
Есть ответ 👍

Тема одномерные массивы написать программу в паскале: 1.массив на 15 значений заполнен случайными числами посчитать количество нечетных значений 2.массив на 14 значений заполнен случайными числами второй сотни с точностью до десятых удалить все целые 3.массив на 17 значений заполнен целыми числами вставить перед каждым полендромом число 10

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

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

рута2
рута2
4,8(72 оценок)
Program one; uses crt; var randomize; i,s: byte; a: array[1..15] of integer; begin for i: =1 to 15 do begin a[i]: =random(1000); end; for i: =1 to 15 do begin if odd(a[i]) then s: =s+1; end; writeln('ne4etnix 4isel-',s); end. как то так 1-я
Балерина2017
Балерина2017
4,8(77 оценок)
Program gt; var s,x: real; begin x: =1; while x< =99 do begin s: =s+x/(x+1); x: =x+2; end; writeln(s: 1: 5); end. : 1: 5-это 5 цифр после запятой

Популярно: Информатика