XWare Поиск по информационным ресурсам МГУ English Russian
       
       Точная форма слов   О проекте   Сайты   Помощь
Поиск по:   - Поискать по всем серверам
На этой странице приведены все страницы, которые ссылаются на http://us.chem.msu.su/courseware/pascal/beginend.htm. Показаны документы 1 - 1 из 1.

1. Программирование и решение задач на ЭВМ - Справочник
Главная Программа Материалы - Конспекты - Задачи Электрожурнал Успеваемость Преподавателям . Нахождение сумм всех целых чисел и их квадратов от 1 до N *) . ... i, n: integer; . ... begin . ... begin (* Начало составного оператора*) . ... end; (* Конец составного оператора*) . writeln (' Сумма целых чисел от 1 до',n:3,' равна: ',s1:6); . writeln; (* Пропуск пустой строки при печати *) . writeln (' Сумма квадратов этих чисел равна:', s2:6); . end. ... Integer . ... write , writeln . ...
[ Сохраненная копия ]  Ссылки http://us.chem.msu.su/courseware/pascal/progr2_so.htm -- 9.2 Кб -- 22.11.1998
Похожие документы


Астронет | Научная сеть | ГАИШ МГУ | Поиск по МГУ | О проекте | Авторам

Комментарии, вопросы? Пишите: info@astronet.ru или сюда

Rambler's Top100 RFBR Яндекс цитирования