(написать программу) спортсмен в 1 день пробежал 10 км, каждый день он увеличивал пробег на 10%.в какой день он пробежит 20 км?
100
287
Ответы на вопрос:
program sport; var s: real; day: integer; begin day : = 1; s : = 10; while s < 20 do begin day : = day + 1; s : = s + (s/100)*10; end; writeln(day); readln; end.
Program n_1; var n,count: integer; begin write('введите натуральное полож.число n -'); read(n); count: =0; while n> 0 do begin n: =n div 10; count: =count+1; end; write(count); end. попробуй эту программу
Популярно: Информатика
-
ник03030310.02.2020 01:22
-
Katуа0728.09.2021 01:38
-
kuchakshoevaZ23.03.2020 16:55
-
Klimg01.03.2022 02:52
-
syav197917.10.2020 04:42
-
Modoki27.04.2020 04:47
-
km7328323.07.2021 05:55
-
vbvb200614.04.2023 06:18
-
KLerK1129.05.2020 05:13
-
iavorskayavika11.02.2022 22:47