Напишите программу, которая составит все возможные комбинации из цифр 3.4.5.6. и проверит каждую из этих комбинаций, является ли она точным квадратом
Аноним:
язык?
Ответы
Ответ дал:
0
Ответ:
Объяснение:
var a,b,c,d:integer;
begin
for a:=3 to 6 do
for b:=3 to 6 do
for c:=3 to 6 do
for d:=3 to 6 do begin
if (a<>b) and (a<>c) and (a<>d) and (b<>c) and (b<>d) and (c<>d) and (frac(sqrt(1000*a+100*b+10*c+d))=0) then
writeln(a,b,c,d);
end;
end.
Вас заинтересует
4 месяца назад
6 месяцев назад
6 месяцев назад
2 года назад
7 лет назад
7 лет назад