• Страница 1 из 1
  • 1
Модератор форума: No_MaTTeR, Dimitro, LightInDarkness  
Паскаль
ImboO
Устрой Дестрой
Помогите решить,с меня больше спасибо
Сообщение # 1 написано 13.10.2013 в 02:03
Ulvarez
Apple [TM]
ImboO, нет
Сообщение # 2 написано 13.10.2013 в 02:21
Antimodern
Поняша
42
Набрали ебаного говна в модераторы, сдох вжп. Ну и идите нахуй.
Сообщение # 3 написано 13.10.2013 в 02:23
Csharp
Скаут
Паскаль смутно помню .

Код
Program Calc;
Var    
      t,А ,X: Real; M:=Integer;
Begin    

Write(‘Время или что то там’); Readln(t,M);
    X:=11;
    If Sqr(t)<=Sqr(X);
    Then X:=A*A   ;
  If t>A    
Then X:=A*A*A ;    
      Writeln(X, ‘ Вот вам ИКС =’, F);
End.
Сообщение # 4 отредактировано Csharp - Воскресенье, 13.10.2013, 07:45
  • Страница 1 из 1
  • 1
Поиск: