ребята плиз мне очень нужно ответь
Составить программу, которая бы запрашивала Хнач , Хкон , шаг C и определяла сумму всех отрицательных чисел от Хнач до Хкон с шагом С (решить задачу, используя цикл с постусло-вием – repeat … until).
Ответы
Ответ дал:
0
//Pascal ABC.NET 3.1 сборка 1256
Var
n,k,c,s,kar:real;
i:integer;
begin
read(n,k,c);
i:=0;
s:=0;
kar:=n;
repeat
if n<0 then s:=s+n;
inc(i);
n:=kar+i*c;
until n>k;
writeln(s);
end.
Пример ввода:
-3
1
1.1
Пример вывода:
-5.7
Var
n,k,c,s,kar:real;
i:integer;
begin
read(n,k,c);
i:=0;
s:=0;
kar:=n;
repeat
if n<0 then s:=s+n;
inc(i);
n:=kar+i*c;
until n>k;
writeln(s);
end.
Пример ввода:
-3
1
1.1
Пример вывода:
-5.7
Приложения:
Ответ дал:
0
можеш создать схему этого где начала ввод и канец
Ответ дал:
0
Я так понимаю, Вы имеете в виду блок-схему. Закончу с одной задачей и сделаю.
Ответ дал:
0
ок спасибо
Ответ дал:
0
спасибо
Вас заинтересует
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад