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

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

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

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

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

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

Нужно записать это в Free Pascal
Изображения
Тип файла: jpg Безымянный.jpg (77.5 Кб, 153 просмотров)
ritm9393 вне форума
Старый 09.01.2012, 22:01   #2
McFrey
Форумчанин
 
Аватар для McFrey
 
Регистрация: 15.10.2011
Сообщений: 306
По умолчанию

Код:
program Progect_2;

var
  p, s, d, a, b: real;

begin
  writeln('Введите длину прямоугольника');
  readln(a);
  writeln('Введите ширину прямоугольника');
  readln(b);
  p := 2 * (a + b);
  s := a * b;
  d := sqrt(sqr(a) + sqr(b));
  writeln('Периметр Р= ', p);
  writeln('Площадь S= ', s);
  writeln('Длина диагоналей D= ', d:6:3);
end.
вот 2 задача, насчет остальных пишите в аську, о цене договоримся, они все простые...но их 10 штук ды еще в некоторых по несколько букв=)
Если твоя программа выполняет мистические действия, значит, ты сделал что-то невероятно тупое...

Последний раз редактировалось McFrey; 09.01.2012 в 22:04.
McFrey вне форума
Старый 10.01.2012, 00:18   #3
Xeonc
Форумчанин
 
Регистрация: 20.10.2010
Сообщений: 143
По умолчанию

Выполню все задачи за 60 вмз, если заинтересованы Icq в информации
451 -870-7(три)6. Выполняю работы на заказ, гарант честности - ВМ аттестат с 60+ БЛ без претензий
Xeonc вне форума
Старый 10.01.2012, 06:14   #4
Zer0
Форумчанин
 
Аватар для Zer0
 
Регистрация: 13.12.2007
Сообщений: 788
По умолчанию

Можете написать мне, сделаю быстро, недорого и поясню код
ICQ: 392-459-949
Email: axl_z@mail.ru
благодарность - сюда (не забываем писать от кого)
Zer0 вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Кто может, напишите прграммы. Буду очень благодарна))) Boldir Общие вопросы C/C++ 21 03.01.2011 01:58
кто может помогите пожалуйста решить innaa639 Паскаль, Turbo Pascal, PascalABC.NET 11 20.11.2008 20:00
может не тему, но очень нужно Dude Помощь студентам 6 10.06.2007 22:20