Дан двоичный код 11100001 какие клетки будут закрашены чёрным цветом 12345677 ответы 1,2,3,8. 1,9. 2,9,0. 2,3,4
157
229
Ответы на вопрос:
Var r,x,y : real; k,i: integer; begin write('r='); readln(r); k: =0; for i: =1 to 3 do begin write('x = '); readln(x); write('y = '); readln(y); if sqrt(x*x+y*y)< =r then k: =k+1; end; writeln('в круг попали ',k,' точек'); end.
Популярно: Информатика
-
vorobeowmikhai10.04.2021 06:26
-
Лилия255211.02.2020 23:31
-
savannah112.02.2022 03:57
-
slipnot17403.01.2023 07:42
-
geracim106.09.2021 07:02
-
Артем22221104.05.2020 07:14
-
Natusik161606.03.2020 05:48
-
AnnKulibyakina20.12.2020 06:29
-
русланчик823.06.2023 17:13
-
НастяMokrik08.04.2023 08:17