[Delphi]/[Pascal] Задай вопрос, получи ответ

FORUMS

MEMBERS

RECENT POSTS

НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
[Delphi]/[Pascal] Задай вопрос, получи ответ

#11

30.09.2008, 23:16

eNGi

Новичок

Регистрация: 26.09.2008

Сообщений: 5

С нами: 9275100

Репутация: 5

Цитата:

Сообщение от Syntaxys

if g>d
then
k:=-b;
l:=K+SQRT(i);
n:=K-SQRT(i);
m:=l/2;
o:=l/2;
writeln (M, O);
else writeln (No decision)
end.

Условие в общем случае описывается:

Код:

if (условие_истинно) then действие_1
else действие_2;

или в операторных скобках begin end, если необходимо выполнить несколько действий сразу:

Код:

if (условие_истинно) then 
 begin
  действие_1;
  действие_2;
  действие_3;
 end
else
 begin
  действие_1;
  действие_3;
 end;

Перед "else" " ; " не ставится, а если хочешь во "WriteLn(No decision)" вывести текст, то необходимо заключить его в кавычки

Код:

WriteLn('No decision');

Это по синтаксису... Кажется так

, а также задумайся о книжке по Паскалю.
С математикой сам разберешься.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ!	Alexsize	Беспроводные технологии/Wi-Fi/Wardriving	2570	09.06.2026 16:21
[jQuery] - Задай вопрос, получи ответ	Isis	PHP	62	25.12.2009 03:25

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

Быстрый переход

Home