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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.05.2010, 20:25   #1
oksik_777
Пользователь
 
Регистрация: 19.05.2010
Сообщений: 12
По умолчанию Циклы

Вычислить среднегодовую стоимость (Сс) оборудования за период с момента окончания планового срока лизингового соглашения до полной амортизации оборудования на начало года по формуле
Сс = (Сн+Ск)/2*Т
где
Сн - стоимость оборудования на начало года;
Ск - стоимость оборудования на конец года;
Т - период с момента окончания планового срока лизингового соглашения до полной амортизации оборудования.
oksik_777 вне форума Ответить с цитированием
Старый 19.05.2010, 20:33   #2
Stranger333
Пользователь
 
Аватар для Stranger333
 
Регистрация: 19.05.2009
Сообщений: 98
По умолчанию

я не понял вы должны ввести с клавиатуры Сн, Ск и Т??? Если да то вот:
Код:
var ss,sn,sk:real;t:integer;
begin
  write('стоимость оборудования на начало года=');
  readln(sn);
  write('стоимость оборудования на конец года=');
  readln(sk);
  write('T=');
  readln(t);
  ss:=(sn+sk)/(2*t);
  writeln('Cc=',ss);
  readln;
end.

Последний раз редактировалось Stranger333; 19.05.2010 в 20:35.
Stranger333 вне форума Ответить с цитированием
Старый 19.05.2010, 20:37   #3
ROMA2PVT
ТАМБОВСКИЙ ВОЛК.
Участник клуба
 
Аватар для ROMA2PVT
 
Регистрация: 16.03.2010
Сообщений: 1,354
Смех

Класс мне нравится просто тупо скинули задание и надо его решить. Надо создать раздел ВААЩЕ ХАЛЯВЩИКОВ!!! и сразу туда перемещать такие темы.
にんじゃ
ROMA2PVT вне форума Ответить с цитированием
Старый 19.05.2010, 20:43   #4
oksik_777
Пользователь
 
Регистрация: 19.05.2010
Сообщений: 12
По умолчанию

Спасибо, Stranger333)
ROMA2PVT: да...вот так тупим( поэтому и обращаемся за помошью...за одно занятие по этой теме я ниче не поняла...
oksik_777 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Циклы - вложенны циклы? tigga Microsoft Office Excel 5 19.02.2010 23:36
циклы? serj-07 Помощь студентам 7 29.01.2010 00:25
Циклы dinamit768 Помощь студентам 0 30.10.2009 20:19
Циклы Evgo Помощь студентам 1 17.06.2009 10:30