Есть прога: program WTF; {$APPTYPE CONSOLE} usesSysUtils; vara,b,c…

Question

Есть прога: program WTF; {$APPTYPE CONSOLE} usesSysUtils; vara,b,c,d: real; beginread (a,b,c,d); if d=0 then beginwhile (sqr (a)b<288) do beginb: =b+1; end; d: =asqr (b); endelse if c=0 then beginb: =sqrt (d)(-1); while (asqr (b) <>81) do begina: =a+1; end; c: =sqr (a)*b; end; writeln (a: 1:0,',b: 1:0,',c: 1:0,',d: 1:0); end.

Answer 1

51

karapuzik

02 сентября 2022

Это вам не сюда, зайдите на любой сайт о компьютерах и задайте вопрос на форуме

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

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

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