Найти сумму положительных нечетных чисел от 10 до 125. )
VladislavaForster
2
23.06.2019 07:40
0
Другие вопросы по теме Информатика
Chakachoco
12.08.2019 23:40
DiankaTokmashova
12.08.2019 23:40
optymus
14.02.2022 09:51
sitnikova03
14.02.2022 09:48
Oksanaa11
14.02.2022 09:46
Kireezy
14.02.2022 09:40
настюшаютуб2006
27.05.2019 16:00
hyperIcum
27.05.2019 16:00
enzhedob
27.05.2019 16:00
Anuliks
28.05.2019 06:40
Популярные вопросы
- Напишите вывод к сообщению состав и функции крови...
3 - Угол между двумя плоскостями равен 80 градусов.какое из следующих...
1 - Для какой территории европы характерны: а)польдеры и пустоши; б)сирокко...
3 - Решите уравнение 15 целых 2/9-(х- 4 целых7/9)= 10 целых...
2 - Найди местоимение с предлогами и подчеркни их. ласточка с весною...
2 - Просклоняйте по падежам числительные 784, 567, 2475...
3 - Морфологический разбор на казахском языке слово ұясы...
3 - Разложите на множители; 1)a^3-a= 2)b^3-b= 3)4m^3-4mn^2= 4)a^3b-ab^3=...
2 - Рассмотрите сухие и набухшие семена фасоли. сравните их расмеры и...
3 - Лётчик за 15000 ч, проведённых в воздухе, налетал 5000000 км, а машинист...
3
var n,s:integer;
begin
n:=10;
while n<=125 do begin
if n mod 2<>0 then s:=n+s;
n:=n+1;
end;
write(s);
readln;
end.