Регистрация
Job121
30.01.2021 13:43
Информатика
Есть ответ 👍

10 варик Var a,b,c,K,sum:real;
Begin
K:=0;
Sum:=0;
Write ('a='); read (a);
Write ('b='); read (b);
Write ('c='); read (c);
begin
If a<0 then writeln ('K:=K+1' , 'sum:=sum+a')
If b<0 then writeln ('K:=K+1' , 'sum:=sum+b');
If c<0 then writeln ('K:=K+1' , 'sum:=sum+c');
Writeln('sum=sum/k');
End
end.
у меня выходит sum=sum/k что не так?(

137
146
Посмотреть ответы 1

Ответы на вопрос:

Oishahon
Oishahon
4,5(63 оценок)
16*30*32*16= 245 760

Популярно: Информатика