Войти Регистрация Спроси ai-bota

Ввести три числа. Подсчитать сумму только положительных из трех данных чисел.

Показать ответ

Ответ:

alexaFat

13.09.2020 07:10

PascalABC.NET

begin

ReadSeqInteger(3).Where(p -> p > 0).Sum.Print

end.

0,0(0 оценок)

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

LolliPop611

14.03.2020 09:38

. Подробно, с решением.Просто так не писать....

Cole21

26.08.2020 15:48

Как в виндоус 7 вставить копированый текст...

SweetDreamsOfMade

18.06.2020 11:51

исправить program ww; var k,t,i: real; begin k:=0; for i:=0 to 7 do; if A[i] begin k:=k+1; t:=A[i]; A[i]:=A[i+2]; A[i+2]:=t; end; vrite (k); end....

Denaz

23.06.2022 01:13

1. Перечислить из каких элементов состоит системный блок персонального компьютера. 2. Перечислить единицы измерения информации. 3. Определите порядковый номер в алфавите первой...

zeriss23ozvp18

23.06.2022 01:13

Cистемный администратор Чебурашка прикупил на распродаже на Алике комплект почти новых SSD-дисков емкостью 200, 200, 300, 300, 400, 400, 500, 500. Все емкости измеряются в гигабайтах....

LOLO223

11.02.2023 17:30

Четыре друга Саша, Алексей, Игорь и Юра занимаются в разных спортивных секциях: один играет в волейбол, другой — в баскетбол, третий — в футбол, а четвертый — в теннис. У них...

Sasha77999

04.09.2021 00:02

математических алгоритма с блок-схемы(2 алгоритма линейных, 2 алгоритма с ветвлением). Т.е. алгоритмы должны быть не про огород или посуду, а с числами, которые надо считать....

dashadgankozde8z

25.10.2022 23:22

Устройство произвело перекодировку информационного сообщения, изначально записанного в 14-ти битном коде, в 8 битную кодировку. При информационное сообщение уменьшилось на 900...

markdanilov2002

12.04.2021 05:22

Информатика (Эксель) Выберите верное суждение:а) При форматировании данных изменяются не только сами данные, но и их внешний видб) Форматирование данных не связано с изменением...

karyakinayulya

28.03.2020 06:12

Десятичная система счисления является непозиционной системой счисления Верно или нет?...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку