Регистрация
Ayannn
30.11.2022 02:31
Информатика
Есть ответ 👍

(написать программу) спортсмен в 1 день пробежал 10 км, каждый день он увеличивал пробег на 10%.в какой день он пробежит 20 км?

100
287
Посмотреть ответы 2

Ответы на вопрос:

Ева2208
Ева2208
4,5(92 оценок)

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.

VitaLevchenko2004
VitaLevchenko2004
4,6(50 оценок)
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. попробуй эту программу

Популярно: Информатика