I=3, p=1*3=3
i=4, p=3*4=12
i=5, p=12*5=60
На экран будет выведено значение 60
Ответ:
ответ в) 100..............
program t3;
var a,b,c:real; {допустимо поменять на integer}
begin
writeln ('Vvedit a,b,c');
readln (a,b,c);
if (a<=b+c) and (b<=a+c) and (c<=a+b) then writeln ('0'); else
if (a=c) and (c=b) then writeln (3); else
if (a=c) or (a=b) or (b=c) then writeln ('2'); else
writeln ('1');
readln
end.
<em><u>Где варианты ответа? </u></em>
<em><u>Ну, а если логически, то нельзя играть в компьютерные игры. </u></em>