[Ответить в тред] Ответить в тред
02/12/16 - Конкурс визуальных новелл доски /ruvn/
15/11/16 - **НОВЫЙ ФУНКЦИОНАЛ** - Стикеры
09/10/16 - Открыта доска /int/ - International, давайте расскажем о ней!
Новые доски: /2d/ - Аниме/Беседка • /wwe/ - WorldWide Wrestling Universe • /ch/ - Чатики и конфочки • /int/ - International • /ruvn/ - Российские визуальные новеллы • /math/ - Математика • Создай свою
[Назад][Обновить тред][Вниз][Каталог] [ Автообновление ] 1 | 1 | 1
Назад Вниз Каталог Обновить
Аноним 19/12/16 Пнд 21:46:41  №142559876  
oekaki.png (7Кб, 400x400)
Дано вещественное число а. Из чисел 1,1+1/2,1+1/3.......
напечатать те, которые меньше а.
НАДО РЕШИТЬ В ПАСКАЛЕ ИСПОЛЬЗУЯ ЦИКЛ С УСЛОВИЕМ

Аноним 19/12/16 Пнд 21:54:27  №142560469
var a, n, i: longint;
begin
readln(a);
readln(n);
for i:=1 to n
if a>(1+1/i) then writeln(1+1/i);
end.

Сажи школьнику
[Назад][Обновить тред][Вверх][Каталог] [Реквест разбана] [Подписаться на тред] [ ] 1 | 1 | 1
Назад Вверх Каталог Обновить
Топ тредов
Избранное
Автоматически следить за: