Составить блок-схемы и программы для решения 1. - вопрос №14128641 от берта2904 19.07.2021 08:55

Question

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

берта2904 · 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....