Форматвходныхданных на вход дается два целых числа n, m ( − 10 4 ≤ n, m ≤ 10 4 ) . форматвыходныхданных - id1045626920211229 от 123тася321 29.12.2021 09:31

Question

Информатика: Форматвходныхданных на вход дается два целых числа n, m ( − 10 4 ≤ n, m ≤ 10 4 ) . форматвыходныхданных выведите сначала сумму, а потом произведение чисел, через пробел.

123тася321 · Accepted Answer

Var A,B,C:integer; Begin WriteLn( Введите три числа ); ReadLn(A,B,C); if (A =B)and(B =C) then Write(A, ,B, ,C) else if (A =C)and(C =B) then Write(A, ,C, ,B) else if (B =A)and(A =C) then Write(B, ,A, ,C) else if (B =C)and(C =A) then Write(B, ,C, ,A) else if (C =A)and(A =B) then Write(C, ,A, ,B) else if (C =B)and(B =A) then Write(C, ,B, ,A) End. Var a,b,c,D:real; Begin Write( a = );ReadLn(a); Write( b = );ReadLn(b); Write( c = );ReadLn(c); D:=b*b-4*a*c; if D =0 then    Begin    WriteLn( x = ,(-b-sqrt(D))/(2*a));...

Форматвходныхданных на вход дается два целых числа n, m ( − 10 4 ≤ n, m ≤ 10 4 ) . форматвыходныхданных выведите сначала сумму, а потом произведение чисел, через пробел.

MOGZ ответил