Кто знает Pascal?
Кто знает Pascal?
Очень прошу помогите!!!!!!!!!!!!!!!!!!!!!!!!!
Найти сумму чисел,вводимых с клавиатуры, которые кратны 5 и больше 15!!!!Используя циклическую конструкцию(желательно while)
По дате
По рейтингу
ia znaiu Paint
бесит паскаль,проходить начали-бред,бэйсик тоже дерьмо
Во! Я думал это мертвый язык....
Очень приблизительно:
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.
На паскале не писал много лет. Но идеи основные здесь изложены ;-)
кинь дистриб паскаля в мыло - помогу. (turbo.exe turbo.tpu turbo.tph turbo.ini кажется ) :)
Больше по теме
