Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.11.2008, 18:38   #1
xxasb07
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 13
По умолчанию программа суммирует натуральные числа от 1 до 50 и выводит результат вычисления на экран

Нужно написать программу на языке PASCAL, которая суммирует натуральные числа от 1 до 50 и выводит результат вычисления на экран, используя цикл с послеусловия
xxasb07 вне форума Ответить с цитированием
Старый 17.11.2008, 18:54   #2
pascal65536
Пользователь
 
Регистрация: 03.09.2007
Сообщений: 42
По умолчанию

k:=0;
i:=1;
repeat
inc(k,i);
inc(i);
until i<50
pascal65536 вне форума Ответить с цитированием
Старый 18.11.2008, 10:32   #3
xxasb07
Пользователь
 
Регистрация: 21.10.2008
Сообщений: 13
По умолчанию

pascal65536, БОЛЬШОЕ ВАМ СПАСИБО!!!!!!!
xxasb07 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не выводит числа в Excel через Delphi Light05 Помощь студентам 4 16.10.2008 10:42
программа, которая выводит на экран одно из данных слов vados Паскаль, Turbo Pascal, PascalABC.NET 11 26.10.2007 23:47
как в memo выводит полный путь к файлу? Файлом является данная программа. Alar Компоненты Delphi 0 29.10.2006 23:24