Ответы
Ответ дал:
0
var
count: integer;
input: real;
begin
count := 0;
input := 1;
while (input <> 0) do
begin
write('Введите число(0 - закончить ввод): ');
read(input);
if(input < 0) then
count := count + 1;
end;
write('Количество отрицательных - ', count);
end.
count: integer;
input: real;
begin
count := 0;
input := 1;
while (input <> 0) do
begin
write('Введите число(0 - закончить ввод): ');
read(input);
if(input < 0) then
count := count + 1;
end;
write('Количество отрицательных - ', count);
end.
Ответ дал:
0
это вопрос?
Ответ дал:
0
а можно без count и input
Ответ дал:
0
Тебе ведь надо подсчитать кол- во отрицательных элементов? Если да - нельзя без них
Ответ дал:
0
можешь помочь ?
Ответ дал:
0
С чем?
Похожие вопросы
2 года назад
9 лет назад
9 лет назад
10 лет назад
10 лет назад