подсчитать количество положительных чисел посреди чисел a, b, c. Так чтобы
Подсчитать количество положительных чисел посреди чисел a, b, c. Так чтобы в Паскале программка выводилась, желанно уже подставьте значения
Задать свой вопрос
Оленька Почерская
просто читалась
Болбас
Колян
не выаодилась, а читалась
Дорох
Максим
у меня посточнно ошибку выдает
Amelija Vesova
Кем читалась, где?
Дмитрий Багель
Ребяческий лепет какой-то...
Эвелина Ильвичева
я не знаю как обьяснить
Eva Bezrukavnaja
просто написать программу по этой задаче
Егор Покроев
введя свои значения
Iljusha Chapskij
введя свои значения
Тимур
введя свои значения
1 ответ
Нелли Ваканова
PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018
Внимание! Если программка не работает, обновите версию!
begin
var (a, b, c) := ReadReal3;
var s := a gt; 0 ? 1 : 0;
s += b gt; 0 ? 1 : 0;
s += c gt; 0 ? 1 : 0;
s.Println
end.
3.5 0 -5.191
1
Рассомагина
Виолетта
спасибо, но с таким решением точно спалят что списыаала
Данил
Вы просили решение, Вы его получили. А если Вам надобно, чтобы еще и "под Вас" писали - приводите примеры кода в вопросе...
Владислав Ювайнштейн
А "списать" это решение нельзя, его нигде нет, не считая как здесь.
Витя Домбак
если бы не говорилось про a, b, c, как про три имеющихся числа, эта задачка вообще пишется в одну строку.
Алла Лаверженцева
begin ReadSeqReal(3).Where(t->t>0).Count.Println end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Здравствуйте. Нужен цитатный план испытания лётчика в лесу главы2-13 по повести
Разные вопросы.
Я хочу найти решение и ответ для этой задачи и получить
Математика.
Здравствуйте
Меня зовут Виталий, я AdOps-аналитик компании Adfinity.pro
Заинтересовал ваш проект obrazovalka.com
Думаю сможем увеличить
Разные вопросы.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
мне очень срочно нужно сочинение по рассказу экспонат номер по дной
Литература.
В семье из трех человек три электронных устройства: ноутбук, планшет и
Разные вопросы.
Жаркыраган кашка маш жаралгандан ашка маш табышмак жообу менен
Кыргыз тили.
За лето подруги прочитали 48 книг.Причем Оля прочитала в 3 раза
Математика.
Периметр равнобедренного треугольника ABC (AB=BC) равен 34 см. Периметр треугольника ABM,
Разные вопросы.
«Металлическая болванка, нагрета до 420C, охлаждается в воздухе, температура которого 20C,
Алгебра.
Облако тегов