1. Информатика
  2. 1 завдання. For i := 1

1 завдання. For i := 1 to 5 do If A[i]>=15 Then В := В+A[i]; Label1.Caption:=FloatToStr (B);
2 завдання.
У багаторядковому текстовому полі (Memo) міститься 13 дійсних чисел. Знайти добуток додатних чисел. Вивести цю суму в поле (Edit). Вивести цю суму в поле (Edit).

maksimesaulav46 maksimesaulav46    2   15.03.2021 20:28    0

Ответы
Показать ответы (3)
Другие вопросы по теме Информатика
popravkinaekaterina popravkinaekaterina  26.02.2020 22:26
Решить задачу по информатике, паскаль (массив) В массиве 10 элементов определить максимальный элемент среди нечетных чисел и количество чисел оканчивающихся на 5....
mastheadchan1 mastheadchan1  28.05.2019 13:20
Изменится ли строка st, над которой произведут операцию copy? почему? чему будет равняться k после операции k: =length(‘мышь и клавиатура’)? чему будет равняться...
КамиллаОк КамиллаОк  28.05.2019 13:20
Составить программу для решения следующей : найти площадь кольца, если заданы радиус внешней окружности и радиус внутренней окружности....
DanilZ2 DanilZ2  28.05.2019 13:20
Укого есть программа нужно нарисовать в ней звезду и тут написать координаты , много)...
КлубникО КлубникО  28.05.2019 13:20
Стих дом который построил джек.сколько в нем битов?...
evsiukova80 evsiukova80  28.05.2019 13:20
11, определить значение переменной s после выполнения следующих команд. s: =3; i: =2; пока i ==17 выполнять начало цикла s: =s+1; i: =i+2; конец цикла s: =s+8;...
sitkovskiygleb sitkovskiygleb  12.03.2021 16:47
1. Задан рисунок с разрешением 1024×256 пикселей. Он занимает в памяти 128Кб. В один из скольких различных цветов может быть окрашен пиксель?2. Задан рисунок с разрешением...
tereschenkomaria tereschenkomaria  12.03.2021 16:50
Складіть таблиці істинності логічних виразів зі змінними логічного типу а i b:a) a or a and b;б) a or not a and b;в)a or b or not b;г)not a or not b;д)(a or not...
Ангелиночка02 Ангелиночка02  09.09.2020 17:56
Какой объём информации Любить Украину,як солнце,любить!...
Максим7891 Максим7891  10.09.2020 17:50
В летнем лагере отдыхал(-о) 83 семиклассник(-ов, -а). 6 из них не любят компьютерные игры. 55 семиклассник(-а, -ов) предпочита(-ют, -ет) квесты, 60 — симуляторы....

Популярные вопросы