tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Вычислите сумму ряда 10, 100,
Вычислите сумму ряда 10, 100, 1000 на языке паскаль,
islamkazirbaev
1 09.07.2019 19:20
0
Ответы
tomahvisucik16
02.10.2020 23:39
Var i,k,T,m:integer;
begin;
k:=0;
m:=1;
readln(T);
if T<0 then exit;
for i:=1 to T do
begin;
m:=m*10;
k:=k+m;
end;
writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
zaika787
06.10.2019 08:10
На соревнованиях по стрельбе список пораженных мишеней хранится в виде двоичного кода. каждый номер мишени, пораженной участником, записывается с одинакового и минимально возможного...
кирабим
04.06.2019 14:10
Какие угрозы безопасности существуют при подключении к интернету?...
hhhh34
19.10.2020 06:16
Что вы знаете об основной программе для компьютера?...
leogorec06
19.10.2020 06:16
Postulat-Aksioma-Teorema-Natija ni shakllantiring.shunda qanaqa bòladi ...
mneholodno
19.10.2020 06:17
В каких случаях разварачивается беспроводное подключение Wi-fi? В чём преимущество сети WiMax перед Wi-fi?...
Атытцрьури
17.04.2020 16:48
Написать программу на PascalABC, при ПРОЦЕДУР. Ввести натуральное число. В процедуре найти произведение четных цифр данного числа....
nurija090675
17.04.2020 16:48
4. Отметьте все программы, которые относятся к утилитам. a) текстовый процессор b) системы управления базами данных c) антивирус d) программа проверки диска e) драйвер видеокарты...
lgep08jle
21.03.2021 02:36
Виконати перетворення чисел з десяткової системи числення в шістнадцятирічну систему числення, та зробити обратне перетворення: 62; 38; 50; 196; 147; 134; 562; 678; 748...
laowiskskz
21.03.2021 02:37
Что общего с Юноною и Авось и что их разделят?Моцарт рок-опера...
arinadamnyanova
21.03.2021 02:44
Очень нужно, умоляю Как можно быстрее...
Популярные вопросы
Как происходит образование плодов...
1
Скласти рівняння за умовою задачі.Оксана купила на 5 суконь більше ніж Наталя.Скільки...
3
Чему Дементра учила людей...
1
,рисуйте не очень красиво 10-11 розділи «Чорної ради» Намалюйте ілюстрацію до цих...
3
Побудувати трикутник ABC,якщо АВ=6см,Вс=5см AC 4 см(с рисунком )...
1
Добрый день вас решить два задания одно из которых найти неопределенный интеграл,...
2
1.При якому значенні k вектори a(1;k;3) і b(4;-8;12) будуть колінеарними? 2. Знайдіть...
2
Verbinde die Sätze mit wenn, als, bevor oder während! ОЧЕНЬ ! 1. Maria holt die...
3
Под соснами змеится след рыжей лисицы,серого волка синтаксический разбор...
2
2. Выясните, в чем заключалась особенность деятельности Тауекель хана по объединению...
2
begin;
k:=0;
m:=1;
readln(T);
if T<0 then exit;
for i:=1 to T do
begin;
m:=m*10;
k:=k+m;
end;
writeln(k);
end.