Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
srgk

Цикл

21.05.2010, 09:03. Показов 1274. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Нужна помощ. Нужно написать и отладить программу для табулирования функции перевода английских фунтов (lb) в метрические килограммы для значений от 1 до 20 lb с шагом 0,5 lb ( 1 lb равен 0,454 кг).
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
21.05.2010, 09:03
Ответы с готовыми решениями:

Составить программы, используя цикл с предусловием и цикл с постусловием
Дано целое число N (> 0). Найти наибольшее целое число K,квадрат которого не превосходит N: 𝐾 2 ≤ N. Функцию извлечения...

Итерационный цикл и цикл с известным числом повторения
5.12-интерационный цикл 4.9-цикл с известным числом повторений

Цикл FOR,WHILE и Цикл DO WHILE (DENWER+PHP)
Составить алгоритм и программу для вычисления произведения чисел: 13, 14.3, 15.6, 16.9, …, 40.3 Цикл FOR, Цикл WHILE B Цикл DO WHILE

1
113 / 110 / 33
Регистрация: 21.12.2009
Сообщений: 322
21.05.2010, 09:35
Лучший ответ Сообщение было отмечено как решение

Решение

Вот, только проверь, а то мало-ли)))
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program Lb;
uses crt;
VAR m,i: real;
    a:integer;
begin
write(перевод английских фунтов (lb) в метрические килограммы);
i:=0.454;
FOR a:=1 TO 20 DO
    begin
    m:=a*i ;
    writeln(a:7,'    ',m:4:4);
    i:=abs(i+0.5);
    end;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
21.05.2010, 09:35
Помогаю со студенческими работами здесь

цикл while
Даны числа n(определяет кол-во членов последовательности) и A1,A2...An.вычислить min(A2,A4...)+max(A1,A3...).помогите плиз.если...

Цикл
Помогите пожалуйста исправить прогу... Program Lab_1; Uses crt; Var a,b:integer; S:real; Begin ClrScr; ...

Цикл for
Сейчас ознакомился с циклом for и не оч разобрался.Как решить задачу такого плана:дано натуральное целое число n и числа...

Цикл
1. Рост ребенка на начало года равен 120 см. За месяц он подрастает на 2%. Через сколько месяцев его рост превысит 150 см. (задача на цикл).

Цикл WHILE
Задание: составить программу для вычисления произведения конечного ряда: http://www.ljplus.ru/img4/n/i/nikitosique/1.jpg Вот что...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Вывод данных через динамический список в справочнике
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Функция заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru