|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Помогите перевести код паскаль в делфи (новичок)
Код:
var i:integer; Begin For i:=1000 to 9999 do if (i div 1000 + i mod 10)=(i div 100 mod 10 + i div 10 mod 10) then write(i:5); End. Последний раз редактировалось Admin, 30.05.2018 в 22:25. |