Предмет: Информатика, автор: flovezzz333

Срочно! Как на 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.

Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Английский язык, автор: olkud
Перевести на английский: 1) Я лежу на солнышке и слушаю плеер. Мама с сестрой плавают в море. А папа сидит рядом со мной и рисует. Хорошо. И уменя нет уроков! 2) Здесь много людей, но совсем не шумно. Все сидят за столами и читают разные книги и что-то записывают в свои тетради. ------------ Только не надо копировать это в переводчики, мне нужен грамотный перевод:)
2 года назад
Предмет: Английский язык, автор: slava137
перевод текста the ring shows the way part 2
2 года назад
Предмет: Математика, автор: Аноним
Дачный участок размерами 20х30 решили огородить забором.Стена дома длиной 10 м заменяет часть этого забора.Чему будет равна длина забора вокруг участка?Нарисуйте рисунок к задаче.
2 года назад
Предмет: Математика, автор: абакар6
《Охотничий словарь》профессора Семина состоял из 56фраз . После консультаций с Шариком профессор исключил из словаря29 и добавил 17 новых фраз . Сколько фраз входит в исправленное и дополненное издание《Охотничьего словаря 》профессора Семина? решите эту задачу пож.
8 лет назад
Предмет: Математика, автор: Аноним
Из прямоугольника ширина которого 2,2 дм а длина в 1, 2 раза больше вырезали квадрат со стороной 1 ,1 дм найдите площадь оставшейся фигуры округлив ответ
8 лет назад