Ребят, помогите перевести данный код на язык Visual Basic Program…

Question

Ребят, помогите перевести данный код на язык 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.

Answer 1

93

vega9000

02 февраля 2023

Известны площадь круша и квадрата. Определить: Уместится ли круг в квадрате и уместиться ли квадрат в круге что ли?

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить