Составить программу на pascal, цикл "для". вычислить 0,1 x + 0,3 x + 0,5 x +…+ 2,1 x
Deelay
2
16.08.2019 18:40
0
Другие вопросы по теме Информатика
tttttrrr
08.12.2021 13:52
Yasha1221
08.12.2021 13:53
vikaprostitova
30.08.2019 14:30
ВенераРезанова
10.05.2019 20:15
Darina1110
10.05.2019 20:09
димкаа2
01.07.2019 05:30
sevara221
16.04.2020 17:12
nselt
23.09.2019 16:20
demkivskabogdan
23.09.2019 14:38
Популярные вопросы
- написать эссе на тему говорят мудрые ...
3 - А) Собственная скорость теплохода 23 км/ч, скорость течения реки 5 км/ч....
3 - считая что каждый символ кодируется одним байтом оцените информационный...
1 - На семейном празднике собрались 3 матери, 7 дочерей, 7 сестер,5 кузин,2...
3 - 235A. Спишите, расставляя пропущен- ные знаки препинания при обособленныхприложениях,...
1 - Қарахан мемлекетінің жер аумағы ...
2 - Which of the events in the text would youlike to attend? Why? Say or...
2 - С.49 упр 12 французский язык береговская 5 класс...
3 - Раскрой скобки и упрости выражение:−7(4b+8)−(3+b)+3(8+6b).ответ: выражение...
2 - Яка кількість речовини кисню знадобиться для повного згорання речовини...
3
var x, a, S: real; i: integer;
begin
readln(x);
S:=0;
for i:=0 to 21 do
begin
a:=(i/10)*x;
S:=a+S;
end;
writeln(S);
end.