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

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

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

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 13.05.2009, 14:01   #1
Кристина_1
 
Регистрация: 13.05.2009
Сообщений: 3
По умолчанию Люди помогите оч срочно!!!!!

Нужно составить программу для нахождения значения выражения k+3 делить на (k+3)*(k+3)+7. Люди очень прошу помогите!!!!!!!!!!!!!!!!!!!!
Кристина_1 вне форума
Старый 13.05.2009, 14:52   #2
MAKEDON
The First Person!
Форумчанин
 
Аватар для MAKEDON
 
Регистрация: 07.08.2007
Сообщений: 228
По умолчанию

А на каком языке? Что тут сложного?
Программа обычно делает то что вы ей сказали сделать, а не то что бы вы хотели, чтобы она сделала.
MAKEDON вне форума
Старый 13.05.2009, 15:00   #3
Кристина_1
 
Регистрация: 13.05.2009
Сообщений: 3
По умолчанию

В программе паскаль вы извините может вам легко а мне вот очень даже не просто
Кристина_1 вне форума
Старый 13.05.2009, 15:04   #4
DM_bite
Участник клуба
 
Аватар для DM_bite
 
Регистрация: 29.07.2008
Сообщений: 1,091
По умолчанию

Код:
program Xdddd;
var k:real;
   begin
   ReadLn(k);
   WriteLn((k+3)/((k+3)*(k+3)+7));
   ReadLn;
   end.
Oh My God...
Кто бы ты ни был - не думай о себе слишком (с)
DM_bite вне форума
Старый 13.05.2009, 15:17   #5
aaa777
 
Регистрация: 13.05.2009
Сообщений: 9
По умолчанию

Даже я могу такую прогу написать))
Код:
program vichislenia;
var k,x: real;
begin
writeln('Vvedite k');
readln(k);
x:=(k+3)/(k+3)*(k+3)+7;
writeln('x=',k:10:2);
end.
aaa777 вне форума
Старый 13.05.2009, 15:18   #6
Кристина_1
 
Регистрация: 13.05.2009
Сообщений: 3
По умолчанию

Цитата:
Сообщение от DM_bite Посмотреть сообщение
Код:
program Xdddd;
var k:real;
   begin
   ReadLn(k);
   WriteLn((k+3)/((k+3)*(k+3)+7));
   ReadLn;
   end.
Oh My God...
Извините а вы уверены что это правильный вариант потому что у меня он не хочет запускаться
Кристина_1 вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Люди помогите пожалуйста срочно с прогой!!! Corleon13 Общие вопросы C/C++ 1 23.02.2009 19:17
Люди помогите срочно пожалуйста! ReWiR Паскаль, Turbo Pascal, PascalABC.NET 12 27.11.2008 14:07
Люди помогите !!! Очень срочно нужно. (ПАСКАЛЬ) Jey_RO Помощь студентам 2 27.05.2008 18:52