< >

Срочно! Как на Pascal написать от 4.71 до 5??? ​

Ответы

Ответ дал: tolkuevgg
0

Program z1;

Var

a:real;

Begin

a:=4.70;

While a<5 do

begin

a:=a+0.01;

writeln(a) ;

End;

End.

Похожие вопросы
Химия
1 год назад
Задача: розрахувати масову частку елементів у речовині з формулою K,COS,
Английский язык
1 год назад
1 What are the rules for forming comparatives and superlatives of short adjectives? 2 What are the rules for forming comparatives and superlatives of long adjectives? 3 Which adjective is irregular?​
История
1 год назад
чому короля імператора оттона 1-го називають надзвичайним імператором?
Литература
1 год назад
Йохим вдало вибрав пісню ​
Қазақ тiлi
2 года назад
Сан есімдерді сөзбен жаз 1. Мен 8 мектеп - гимназияның 6 сыныбында оқимын. 2. Менің ең жақын 3 досым бар. 3. Біздің мектепте 1000 астам оқушы білім алады. 4. 9 мамыр - Жеңіс күні - менің ең сүйіті
Литература
2 года назад
что такое передовой класс?​
Химия
8 лет назад
5-46 полное решение, пожалуйста
Химия
8 лет назад
Помогите срочно даю 15 баллов