мета-данные страницы
Загрузка не удалась. Возможно, проблемы с правами доступа?
Различия
Показаны различия между двумя версиями страницы.
| Предыдущая версия справа и слеваПредыдущая версияСледующая версия | Предыдущая версия | ||
| pascal:algoritms [04/10/2010 02:14] – dnaumov | pascal:algoritms [04/10/2010 02:19] (текущий) – dnaumov | ||
|---|---|---|---|
| Строка 5: | Строка 5: | ||
| uses Crt; | uses Crt; | ||
| const | const | ||
| - | c = 10; | + | c = 2; |
| var | var | ||
| - | a, b : integer; | + | a, b, m, i : integer; |
| + | m1, m2, m3 : integer; | ||
| BEGIN | BEGIN | ||
| {...} | {...} | ||
| Строка 14: | Строка 15: | ||
| ReadLn(a); | ReadLn(a); | ||
| ReadLn(b); | ReadLn(b); | ||
| - | {...} | ||
| - | </ | ||
| - | |**Вывод данных** | ||
| - | WriteLn(a); | ||
| - | WriteLn(b, '. ', a); | ||
| {...} | {...} | ||
| </ | </ | ||
| Строка 39: | Строка 35: | ||
| | ::: | | ::: | ||
| if a>b then m:=a; | if a>b then m:=a; | ||
| + | {...} | ||
| + | </ | ||
| + | |**Вывод данных** | ||
| + | WriteLn(a); | ||
| + | WriteLn(b, '. ', a); | ||
| {...} | {...} | ||
| </ | </ | ||
| Строка 53: | Строка 54: | ||
| - | ====== Примеры ====== | + | ====== Примеры |
| ===== Сумма двух чисел ===== | ===== Сумма двух чисел ===== | ||