Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
відповідь : Мінімальна одиниця текстовоі інформаціі - символ
uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.
var kol,a,b,c: longint;
begin
read(a,b,c);
if a< 0 then kol: =kol+1;
if b< 0 then kol: =kol+1;
if c< 0 then kol: =kol+1;
write(kol);
end.
Популярные вопросы