Question

компьютердик практикум:уч сан берилди.Алардвн ичинен канча сан бирдей экенин аныктоочу программа тузгуло​

Answer 1

Ответ:

uses crt;

var a,b,c:integer;

begin

read(a,b,c);

if (a=b)and(a=c)and(b=c)then write('3');

if (a=c)and(a<>b)then write('2');

if (b=c)and(a<>b)then write('2);

if(a=b)and(a<>c)then write('2);

end.

Объяснение: