мета-данные страницы
Загрузка не удалась. Возможно, проблемы с правами доступа?
Различия
Показаны различия между двумя версиями страницы.
| Предыдущая версия справа и слеваПредыдущая версияСледующая версия | Предыдущая версия | ||
| pascal:algoritms [04/10/2010 02:13] – 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); | ||
| {...} | {...} | ||
| </ | </ | ||
| Строка 41: | Строка 37: | ||
| {...} | {...} | ||
| </ | </ | ||
| - | | Цыклы | + | |**Вывод данных** |
| + | WriteLn(a); | ||
| + | WriteLn(b, '. ', a); | ||
| + | {...} | ||
| + | </ | ||
| + | | **Циклы** | {{ : | ||
| for i:=1 to a do writeln(i, '. ', b); | for i:=1 to a do writeln(i, '. ', b); | ||
| {...} | {...} | ||
| Строка 53: | Строка 54: | ||
| - | ====== Примеры ====== | + | ====== Примеры |
| ===== Сумма двух чисел ===== | ===== Сумма двух чисел ===== | ||