Регистрация
DenisPaliy
04.09.2021 17:24
Информатика
Есть ответ 👍

Создать программу на object pascal. с цикла for вывести значения от x0=0,5 до x=1,5 с шагом dx=0,25. (да, в pascal нельзя задать шаг, но в этом и суть )

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

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

zadykamova
zadykamova
4,8(62 оценок)

Задание 1:

begin var a := ArrRandom(ReadInteger('Количество:'),-15,10); Println('Массив:',a); Println('Сумма:',a.Where(x->x<0).Sum); end.

Задание 2:

begin var a := ArrRandom(ReadInteger('Количество:'),-42,20); Println('Массив:',a); Print('Элементы:'); a.Where(x->x mod 3 = 0).Print; end.

Пример работ:


1.Сформировать и вывести на экран массив, элементы которого заданы датчиком случайных чисел на интер

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