Написать программу количество натуральных чисел
Паскаль
адильнури
2
12.03.2022 05:37
2
Другие вопросы по теме Информатика
Лизатян4
20.10.2020 14:06
dinoirino18
20.01.2020 02:26
Kiska41384
20.01.2020 02:00
291104
20.01.2020 03:06
alinakuzmich324
20.01.2020 05:22
ksusha290
19.04.2020 20:44
diana5974767
19.04.2020 20:44
vlad1458
19.04.2020 20:43
Популярные вопросы
- Государство, столица которого дальше всего на юг (в европе)...
2 - Обычаи и традиции казахского народа в первой половине xix века...
1 - 1.вычислите: а)2\9-2\18; б)2целых4\5: 1,6; в)18,48: 6,6+1,4*0,7 2.10 гусениц...
3 - На сборку поступают детали с трёх конвейеров. первый конвейер даёт 0,3%...
1 - Чем посимвольное кодирование отличается от обычного, пример...
2 - Внаклонной треугольной призме боковое ребро равно 5 см. площади двух боковых...
1 - 1. разложите многочлен на множители: а) 14а³ - 28а²х² + 63а⁴ б) х³ - 100...
3 - Составить и решить 2 на завместную работу.и без иксов...
2 - Весна-пора прилёта птиц. они летят из чужих тёплых стран в родные края....
1 - Разложите на множители 3a-6b+ab-2b^2...
1
var s,n:integer;
begin
repeat
readln(n);
if (n mod 3=0) and (n<10) then s:=s+n;
until n=0;
writeln('S=',s);
end.