1) Напишите программу поиска в интервале трехзначных чисел количества чисел, кратных 3 2) Напишите программу поиска всех четных чисел в промежутке от 10 до 300
Anyta15111
2
06.12.2020 21:56
2
Другие вопросы по теме Информатика
аня2942
04.09.2019 22:40
витка9
12.12.2020 12:24
PeaceMaker1337
31.05.2019 05:20
AsiMy
31.05.2019 05:20
didisa0282
31.05.2019 05:20
larisaiventeva
31.05.2019 05:20
BotanicPanik
31.05.2019 05:20
annakolupaewa20
31.05.2019 05:10
Популярные вопросы
- Vse vozmojnie eninitsi izmerenia частоти...
3 - Сөзжұмбаққа қойылатын тадаптар . 1.тірек сөз болуы керек 2сұракқтар...
3 - Характеристики тканей используемые в современной одежде французов...
1 - Гробовщик пушкина | смешно или страшно было читать сон гробовщика?...
2 - Сумму чисел 91 и 7 уменьшили в 14 раз...
3 - Стороны треугольника относятся как 3: 4: 5 периметр подобному...
2 - Волшебник изумрудного города. какие уроки можно извлечь из прочитанного...
2 - Pojaluysta pomogite..skorooo eto geograficheskaya progressiya...
3 - Определить прямым или переносным является значения слова в данном...
2 - Можно ли без взрослых путешествовать по болоту,чем это опасно?...
2
1.
var i, k:Integer;
begin
k:=0;
for i:=100 to 999 do begin
if i mod 3 = 0 then
k:=k+1;
end;
write(k);
end.
2.
var i:Integer;
begin
for i:=10 to 300 do begin
if i mod 2 = 0 then
writeln(i);
end;
end.