Есть ответ 👍

100б. написать функцию по схеме и составить таблицу истинности. )

269
460
Посмотреть ответы 1

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

BlackStile
4,7(16 оценок)

Var   a,f,s,i: longint; begin               for i: =1 to 3 do begin               readln(a);               inc(s,a);               if (a< 0) then inc(f); end;               writeln(s);               writeln(f); end.

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