Регистрация
ladyviktoria
18.04.2023 19:23
Информатика
Есть ответ 👍

решить задачу на паскаль Дан одномерный массив из 25 элиментов. элементы стоящие на четных местах равны 1/i на не четных местах равны 2/i. Написать программу и вывести полученый массив на экран.

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

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

Артем222211
Артем222211
4,4(28 оценок)
Var a: array [1..10] of real; begin       writeln('введите 10 натуральных чисел');       for i: =1 to 10 do read(a[i]);       for i: =1 to 10 do               if a[i] > 0 then writeln(a[i]) end. программа просит пользователя ввести 10 натуральных чисел. для этого используется оператор read в первом цикле. во втором цикле проверяется каждое из 10 чисел. если оно положительное, т.е. больше 0, оно выводится на экран. затем программа завершает работу.

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