KMPlayer.Muzabaza Player.VLC Media Player.Adobe Photoshop CS6.CUBASE.Windows Media Player.FloorPlan 3D.ComboPlayer.
Спасибо
Ответ дал: Гость
program xxx; var i, n, max : integer; s : real; a : array [1..20] of integer; begin write ('введите n= '); readln(n); for i: =1 to n do readln (a[i]); max: = a[1]; for i: =1 to n do if a[i] > max then max : = a[i]; s: = sqrt(max); write ('корень из наибольшего эл-та =', s)end.
Ответ дал: Гость
uses crt; var
a,b,c,min: integer; begin writeln('введи три числа: '); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln('наименьшее из этих чисел: ',min); end.
Популярные вопросы