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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 16.09.2012, 15:19   #1
Wuzup
 
Регистрация: 16.09.2012
Сообщений: 4
По умолчанию написание програмки на Pascal

есть задача: Вычислить заданное смешаное арифмитическое выражение для данных в форматах Real(a,b) Integer(остальные)
sin(21-a)*c/4

ничего не знаю в програмировании
я в паскале прописал
Код:

Program <name>
{TB-22}
uses crt;
var a,b:real
c,x:integer;
begin;
clrscr; write ('a=')
write ('c=');
x:=sin(21-a)c/4;
end;


но я так понял,что что-то пропустил
какие команды еще нужны?
Wuzup вне форума Ответить с цитированием
Старый 16.09.2012, 16:17   #2
Hacker19_90
Delphi Warrior
Старожил
 
Аватар для Hacker19_90
 
Регистрация: 15.08.2008
Сообщений: 2,502
По умолчанию

хм...

Код:
begin
  clrscr;
  Write('Enter a & c:');
  ReadLn(a, c);
  Writeln('sin(21 - a)*c/4 = ', (sin(21-a)*c/4):4:3);
  ReadKey
end.
Так?
Mess with the best, die like the rest. (с) Hackers
Лабораторные, курсовые на Delphi\Pascal\C++
ya.flex-freelance@yandex.ru Icq - 636-954-303
Hacker19_90 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
написание програмки на Pascal Wuzup Помощь студентам 2 16.09.2012 12:36
Требуется написание програмки lordfray Фриланс 0 30.08.2012 21:40
Написание простенькой програмки. NoN C++ Builder 1 26.06.2011 20:29