1. Информатика
  2. Написать программу Pascal

Написать программу Pascal
Написать программу, которая в заданном с клавиатуры массиве из 7 целых чисел
находит сумму элементов, меньших 4.

khleskina02 khleskina02    2   02.04.2020 10:53    0

Ответы
chicheviup00zou chicheviup00zou  12.10.2020 12:47

для версий PascalABC.NET 3.5.1.2290 + .NET Framework 4.7.1 и выше

begin

var A := ReadArrInteger(7);

A.Where(p -> p < 4).Sum.Println;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
KseshaMail KseshaMail  09.10.2020 03:59
«101» екілік кодына сәйкес санды анықта​...
tinkimolko tinkimolko  09.10.2020 01:54
Переведите число 11012в десятичную систему счисления. Переведите число 51 10 в двоичную систему счисления.Переведите 57110 В восьмеричную систему счисления.Переведите 12310 в...
GizziMix2007 GizziMix2007  09.10.2020 03:56
Мини сочинение Самая интерсная с точки зрения информатики профессия...
деляяяяяя деляяяяяя  09.10.2020 03:25
10 плюсов и 10 минусов беспроводных сетей....
ДашинСамурай ДашинСамурай  19.12.2019 17:30
Запишіть виконання наведеного фрагмента для табличної величини значенням� елементів якої є числа: 2; -2; 3; 0,25; -4....
Monimix Monimix  19.12.2019 17:29
Перевести число 10010.11 из двоичной системы счисления в десятичную....
10082003настя 10082003настя  19.12.2019 17:28
Код crc4 исх.сообщение 01101110(x^6+x^5+x^3+x^2+x^1)/x^4+12 вопроса задал никто не ответил сайт дно...
Nakonechna21 Nakonechna21  31.05.2019 17:50
Закончите предложения информатика -это -это фонетика -это раздел ботаника-это раздел науки о имя сущ -это самостоятельная часть глагол -это самостоятельная часть земледельцы -это...
ukrainskayaa ukrainskayaa  04.10.2019 17:00
Написать программу в abc pascal которая изображает на экране дорогу по которой едет грузовик и елку на обочине...
hikka137 hikka137  04.10.2019 17:00
Если в локальной сети есть компьютеры с ip адресами 192.168.1.10, 192.168.2.11, то маска в такой сети …?...

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