Составить блок-схемы и программы для решения 1. даны - вопрос №14119621 от Arinaiv1 28.05.2021 09:38

Question

Информатика: Составить блок-схемы и программы для решения 1. даны три действительных числа а, в, с. определите, сколько среди них отрицательных.

Arinaiv1 · Answer

var d:real;i,k:integer;Begin    k:=0;    for i:= 1 to 3 do begin        writeln( Введит число );        read(d);        if (d 0) then k:=k+1;    end;    writeln(k);End....