Ответы на вопрос:
Var rast,summa: real; k: integer; begin rast: =10; summa: =10; for k: =2 to 7 do begin rast: =rast+rast/10; summa: =summa+rast; end; writeln(summa); end.
Популярно: Информатика
-
Задача 1: Длинный плакат Юный художник Вася нарисовал плакат с очень...
Valida1202.04.2020 03:33 -
Задача 2: Танец Для школьного праздника группа учащихся решила поставить...
NastyuZnanija01.08.2021 13:10 -
На рисунке — схема дорог, связывающих города А, Б, В, Г, Д, Е, К....
Андрей1441106.08.2022 07:16 -
Перекласти з десяткової системи числення в двійкову: 148, 120....
Puroscok00922.04.2020 00:02 -
У Askhat 8 ГБ флэш-памяти.Сколько 400-страничных электронных книг...
maks71921.12.2021 05:08 -
ДАЙТЕ ВІДПОВІДЬ Які пристрої комп ютера належать до пристроїв уведення...
ktoya224.06.2023 05:09 -
Excel Бағандар саны қандай әріптермен белгіленеді?...
hhgfg20.10.2022 20:21 -
Патч -корд -это Сетевя карта- это... Сетевой коммутатор- это... Роутер-это......
EkaterinaVNTOGLIATTI30.03.2020 10:35 -
Два игрока, Петя и Ваня, играют в следующую игру. Перед игроками лежит...
Faleck07.09.2021 04:26 -
Хранит информацию в текущий момент времени, пока включен компьютер...
eminimanov19813.10.2021 13:28