Pascal выведите все числа на отрезке от a до b, являющиеся полными квадратами. примеры: входные данные 1 5 выходные данные 1 4

257

400

Посмотреть ответы 2

Ответы на вопрос:

sofya206

Информатика

4,6(6 оценок)

Var a,b,i: integer; x: real; begin readln(a); readln(b); if a< 0 then a: =1; for i: =a to b do begin x: =sqrt(i); if frac(x)=0 then write(i,' '); end; end.

Ехепхеп

Информатика

4,4(15 оценок)

64(10) = 8^2 = 100(8) 57(10) = 7*8 + 1 = 71(8) 6524(10) = 16^3 + 9*16^2 + 7*16 + 12 = 197c(16) 00100111(2) = 2^5 + 2^2 + 2 + 1 = 32 + 4 + 2 + 1 = 39(10) 01111110(2) = 2^6 + 2^5 + 2^4 + 2^3 + 2^2 + 2 = 64+32+16+8+4+2 = 126(10)