58

Turbo PascalВ 1 день спортсмен пробежал 10 км. Каждый следующий день спортсмен…

10 марта 2023

Turbo PascalВ 1 день спортсмен пробежал 10 км. Каждый следующий день спортсмен увеличивал норму пробежки на 500 м (0,5 км). Через сколько дней он будет пробегать 30 км? 100 км?

категория: информатика



40

Var c,d,b,f: integer; a,e: real; Begina: =10; e: =10; f: =0; while a<30 dobegina: =a+1/2; b: =b+1; end; writeln (b); while e<100 dobegine: =e+1/2; f: =f+1; end; writeln (f); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...