Задание:
Ребят, помогите перевести данный код на язык Visual Basic Program prim; Var a,r,s1,s2: real; BeginWrite ('введите площадь круга и квадрата'); Readln (s1, s2); A: =sqrt (s2); R: =sqrt (s/3,14); If (r (4*r) then writeln ('квадрат уместится в круге') Else Writeln ('квадрат не уместится в круге'); ReadlnEnd.
Решение:
Известны площадь круша и квадрата. Определить: Уместится ли круг в квадрате и уместиться ли квадрат в круге что ли?
Знаете другой ответ?