Подскажите, решение на паскаль по информатике. даны натуральные числа от 1 до 50. найдите сумму тех, которые делятся на 5 и на 7.решите цикл с предусловием и с постусловием, блок схемы и программы.
vitay123
1
28.05.2019 15:50
0
Другие вопросы по теме Информатика
дима4455
08.04.2020 14:06
olgaversh
08.04.2020 14:06
llvoronall
20.05.2019 04:20
вика3169
21.05.2021 09:57
minikolp12344
23.12.2019 17:31
ячетнмнжневсебе
23.12.2019 17:31
den535
23.12.2019 17:33
денисдениска
23.12.2019 15:59
DaryaKovalkina
26.11.2020 13:57
Популярные вопросы
- Дізнайся, яка річка є найбільшою у твоєму рідному краї. Напиши її назву,...
1 - Склади пам ятку про економне використання води в побуті....
3 - Які з тварин Чорного й Азовського морів мають промислове значення (А),...
2 - Проклади маршрут від порту Маріуполь до Атлантичного океану. Кінцевий...
1 - Поміркуй і напиши, де крім водойм міститься вода в природі?...
3 - Практична робота «Позначення на контурній карті України озер та річок»...
2 - Напиши назву навчального проекту, у виконанні якого ти береш участь...
2 - Склади список використаної літератури та інших інформаційних джерел....
3 - Склади правило захисту ґрунтів твоєї місцевості. Щоб захистити ґрунт...
2 - Наведи приклади рослин і тварин Полісся. Назви тих, які занесені до Червоної...
1
var
a,b:integer;
begin
b:=0;
for a:=1 to 50 do
if (a mod 5 = 0) and (a mod 7 = 0) then b:=b+a;
writeln(b);
end.