Регистрация
Войти
Стать экспертом Правила
Информатика

Составьте программу для вычисления количества первых нечетных чисел, в сумме дающих 100.В paskal !

ОТВЕТЫ
Program n1;
var i,k,s: integer;
begin
while s<>100 do
begin
if i mod 2<>0 then
begin
s:=s+i;
k:=k+1;
end;
i:=i+1;
end;
writeln(k);
end.
871
Нужен срочно ответ?
1 Зарегистрируйся
2 Пополни баланс баллов
3 Назначь баллы за ответ
Чем больше баллов, тем выше веротяность скорого ответа
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам