Задание. Составьте блок схему алгоритма решения задачи и программу на языке Turbo Pascal c использованием условного оператора.
10-11 класс
|
Даны три целых числа.Найти кол-во положительных чисел в исходном наборе.
var a,b,c,n:integer;
begin
readln(a,b,c);
if a>0 then n:=1;
if b>0 then n:=n+1;
if c>0 then n:=n+1;
writeln('Количество положительных: ',n);
readln
end.
Другие вопросы из категории
кодировался 2-ух байтовой кодировкой, составил 720 Кбайт. Ответ запишите в виде целого числа.
549=
840=
Пожалуйста очень надо!!!
Читайте также
Составить блок-схему алгоритма решения задачи и программу на языке паскаль одним способом:
Σ сверху сигмы 40,снизу сигмы x=1 (x^2+(5/(x^2+8)))
пользование электроэнергией производится по разным тарифам в зависимости от того, установлены ли в доме электрические или газовые плиты. В первом случае (электрические плиты) стоимость 1 кВт/час составляет 2 руб., во втором – 2.5 руб. Составить программу расчета суммы оплаты за пользование электроэнергией за месяц, если известен расход электроэнергии (количество потребленных в течение месяца кВт/час)
Задание 2) Разработать блок схему алгоритма? для вычисления и вывода на экран суммы 5 случайных числе в диапазоне 0..36.
Я не могу сочинить этот "алгоритм", помогите ;)
Блок-схемы строить не надо, просто описать, что надо делать.
если а >б и модуль их разности в противном случае