Составить блок-схемуданы 3 числа (любых), программа должна посчитать и вывести кол-во чисел, которые делятся на три
nastyakopylova7
1
07.03.2019 07:15
76
Другие вопросы по теме Информатика
StarSquirrel
17.07.2019 07:40
itrufanova2016
08.03.2019 12:20
hehsggsvsg
08.03.2019 12:20
MisSashaKotik
23.05.2020 08:22
п152
23.05.2020 20:30
goshakuzovniko
03.05.2020 15:27
pelmen123456789
03.05.2020 15:26
ematrenichev
16.07.2019 22:30
Андрей22111111
30.09.2019 21:40
Популярные вопросы
- Что Выраженное обычно в процентах отношение фактического уровня показателя к плановому...
1 - Основания трапеции равны 12 см и 18 см, а высота — 15 см. Найдите расстояние от...
3 - Каково взаимное расположение прямых АВ и CD, если АВ = 6 см, ВС = 12 см, АС =15...
2 - Найдите катет прямоугольного треугольника, если его проекция на гипотенузу равна...
1 - Высота прямоугольного треугольника, проведённая к гипотенузе, равна 14 см, а проекция...
3 - Через вершину С треугольника АВС проведите прямую, отсекающую от данного треугольника...
1 - Отрезки DE и DF — высоты параллелограмма ABCD, DE=8 см, DF = 6 см, AD + CD = 28...
2 - Точка пересечения хорды и диаметра окружности делит хорду на отрезки длиной 8 см...
3 - Докажите теорему о свойстве высоты прямоугольного треугольника, проведённой к гипотенузе,...
2 - Запиши синонимы и антонимы к слову сложный...
3
var a,b,c,p: integer;
begin
readln(a,b,c);
if a> 0 then begin p: =p*a; writeln(a); end;
if b> 0 then begin p: =p*b; writeln(b); end;
if c> 0 then begin p: =p*c; writeln(c); end;
writeln('произведение: ',p);
end.