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


ivanushka2
15.12.2022 03:32

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

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Black219911
Black219911
25.01.2021 19:19
Установите соответствие. 1) at symbol 2) tilda 3) ampersand 4) backslash a) & b) / c) @ d) ~...
spaisminGena
spaisminGena
25.01.2021 19:19
Установите соответствие между значением переменной и ее типом: 1)х: =sqrt(16) а)booleam 2)y: = x б)integer 3)z: =х 0 с)real 4)q: =-9 д)char...
IamInga18
IamInga18
25.01.2021 19:19
Папа поставил скачивать файл и определи,что закачка займет 20мин. когда закачалось 20%, мама поставила скачивать свой файл. через 6минут после мамы коля поставил скачивать...
kwasmarianna
kwasmarianna
31.01.2021 21:50
Составить программу вычисления суммы цифр введенного с клавиатуры 3- х значного натурального числа . например для числа 128 сумма цифр 11, а для числа 345 сумма цифр12....
chastener40
chastener40
31.01.2021 21:50
Нужна . программа в pascal недавно петя научился считать. он тут же заметил, что число 2 обладает замечательным свойством - 2 + 2 = 2 × 2. его старший брат ваня тут...
katelove8
katelove8
29.09.2021 01:26
Иван решил найти все письма от адресата про электронный адрес которого помнит, что тот содержит подстроку petrov , в которой возможны ошибки ( но не более двух). сколько...
дильназСпецназ
дильназСпецназ
29.09.2021 01:26
Нарисовать квадрат используя procedure lineto. (паскаль)...
380661146235
380661146235
29.09.2021 01:26
Program summa; var a,s: real; begin s: =0; a: =0.2; while a =2 do begin s: =s+a; a: =a+0.1; end; writeln(‘сумма=’, s: 15: 2); end. составить блок схему...
dashaponomarev4
dashaponomarev4
20.05.2023 23:19
Якщо довго грати в компьютерные игры то...
ангел201311111
ангел201311111
20.08.2022 09:20
На рабочем столе имеется ярлык мой компьютер . при резком (случайном) движении рукой по верхней части тачпада,над рабочим столом (в самой верхней части экрана образовалась...
Ответ:
avramenko0707
13.09.2020 07:10

PascalABC.NET

begin

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

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота