Вычислить n-й элемент арифметической профессии a1 = 1, а2=3, а3=5, а4=7, а5=9, ... . (программа Паскаль)
TemChik2007
2
16.04.2019 23:00
3
Другие вопросы по теме Другие предметы
unicorn2837
04.02.2021 21:13
хххххх15
04.02.2021 21:12
МарянДансер
04.02.2021 21:11
Маргоht
11.11.2020 18:47
vakhram
11.11.2020 18:47
даша3335
11.11.2020 18:48
норочка3
03.03.2021 04:32
anikeevae
03.03.2021 04:33
Tomoki
03.03.2021 04:33
Популярные вопросы
- Если реактивный самолет имеет скорость равную скорости звука в воздухе...
1 - Решить : 1.автотуристы были в пути 15 часов в течение 2 дней. 420...
2 - Люди добрые по сколько молекул содержит 6,2 г. угольной...
1 - Решите неравенство: log3(x-1) ≥2 ответ: x≤10 неверен...
3 - Составьте графические формулы фосфорной угольной и серной кислот и...
1 - Чем отличаются бесполого размножения губок?...
3 - Рассчитать v (co2), выделившегося при разложении 200 г карбоната кальция...
2 - Потужність праски 1800 вт який опір має праска, якщо струм у нагрівальному...
1 - Тема, идея и проблема произведения а.с. пушкина моцарт и сальери...
1 - На тело влево действует сила 100h, а вправо 60h опредилить их равнодействующую....
3
А: Rеаl;
Begin
Write (‘N=’);
Readln(N);
А:=1;
For I:=2 То N Do
А:=А+2;
Writeln (‘A(‘,N:1,’)=’,A:6:0);
End.