Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 24.11.2011, 14:35   #1
flame-93
Пользователь
 
Регистрация: 24.11.2011
Сообщений: 13
Сообщение Паскаль

Решите две задачи. 1. Написать программу, которая выводит на экран таблицу соответствия между весом в фунтах и весом в килограммах для значений от 1 до 10 фунтов, если 1 фунт=453г.
2. Написать программу вычисления факториала числа введенного с клавиатуры. Факториал - последовательное произведение натуральных чисел от 1 до заданного (например, 5!=1*2*3*4*5=120)
flame-93 вне форума
Старый 24.11.2011, 14:39   #2
IT-man
АльTRUEи$т
Форумчанин
 
Аватар для IT-man
 
Регистрация: 19.03.2009
Сообщений: 784
По умолчанию

1
Код:
 for i:=1 to 10 do
writeln(i,'-->',i*0.453);
2)
Код:
 
var f,n,i:integer;
begin
readln(n);
f:=1;
 for i:=2 to n do
f:=f*i;
writeln(f);
end.
Цитата:
«Никто не войдет в Рай, имея хотя бы крупицу гордыни в своем сердце». «Аллах Красив и любит красоту. Гордыня означает отказ от истины и высокомерие»

Последний раз редактировалось IT-man; 24.11.2011 в 15:12.
IT-man вне форума
Старый 24.11.2011, 14:40   #3
Mandrivnyk
Software Developer
Участник клуба
 
Аватар для Mandrivnyk
 
Регистрация: 01.03.2011
Сообщений: 1,098
По умолчанию

.:: Deleted ::.
Болтовня ничего не стоит. Покажите мне код. (c) Linus Torvalds
Помог ответ? -- Поставьте отзыв.
Выражения особой благодарности в рублевом эквиваленте отправлять сюда --> R269634919062
Mandrivnyk вне форума
Старый 24.11.2011, 15:06   #4
flame-93
Пользователь
 
Регистрация: 24.11.2011
Сообщений: 13
По умолчанию

Можете 2 задачу чуть больше написать?
flame-93 вне форума
Старый 24.11.2011, 15:14   #5
flame-93
Пользователь
 
Регистрация: 24.11.2011
Сообщений: 13
По умолчанию

writeln(f); забыл написать вот и не получалось. Спасибо большое)
flame-93 вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль, Борланд Паскаль-в чем разница??? Vremya-Dengy Паскаль, Turbo Pascal, PascalABC.NET 13 31.05.2011 18:23
паскаль ronny137 Помощь студентам 7 27.05.2011 19:44
паскаль и турбо паскаль Евгения Игоревна Помощь студентам 6 05.05.2011 14:31
паскаль katetakate Помощь студентам 2 24.11.2010 19:33