Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиПоискОблакоComboВсе проекты

Кто знает Pascal?

Юля Ученик (133), закрыт 14 лет назад
Кто знает Pascal?
Очень прошу помогите!!!!!!!!!!!!!!!!!!!!!!!!!
Найти сумму чисел,вводимых с клавиатуры, которые кратны 5 и больше 15!!!!Используя циклическую конструкцию(желательно while)
Nelson44 Мастер (1200) 15 лет назад
А мне пока не надо!!
Alexander Гуру (2926) 15 лет назад
Некорректное задание или я чего-то не понял.
Паша Гуру (3934) 15 лет назад
кинь дистриб паскаля в мыло - помогу. (turbo.exe turbo.tpu turbo.tph turbo.ini кажется ) :)
Пользователь удален Мастер (2195) 15 лет назад
Очень приблизительно:

program HelloWorld;

BEGIN
var Sum : Integer;
vat N : Integer;
Sum := 0;
while (readln(N)) do
begin
if (((N / 5) = trunc(N / 5)) and (N > 15)) then Sum := Sum + N;
end;
writeln("Sum = ", Sum);
END.

На паскале не писал много лет. Но идеи основные здесь изложены ;-)
Кальций Карбонат Оракул (64450) 15 лет назад
Во! Я думал это мертвый язык....
Пользователь удален Знаток (399) 15 лет назад
бесит паскаль,проходить начали-бред,бэйсик тоже дерьмо
Похожие вопросы