foursquare
Uses crt; var input,a,b,c:integer; begin readln(input); if(input >= 100) and (input <= 999) then begin writeln('Число трехзначное.'); if (input mod 2 <> 0) then writeln('Число нечетное.'); end; readln(a,b,c); if(a > b ) and (a > c) then a := b + c; if(b > a ) and (b > c) then b := c + a; if(a < c ) and (b < c) then c := a + b; writeln('a = ', a); writeln('b = ', b); writeln('c = ', c); end.
1 votes Thanks 1
ernesto13
Это все 3? спасибо большое тебе можешь ещё 2 решить другие Плиз?
Answers & Comments
var input,a,b,c:integer;
begin
readln(input);
if(input >= 100) and (input <= 999) then
begin
writeln('Число трехзначное.');
if (input mod 2 <> 0) then
writeln('Число нечетное.');
end;
readln(a,b,c);
if(a > b ) and (a > c) then
a := b + c;
if(b > a ) and (b > c) then
b := c + a;
if(a < c ) and (b < c) then
c := a + b;
writeln('a = ', a);
writeln('b = ', b);
writeln('c = ', c);
end.