Uses wincrt; var n : integer; i : byte; begin write('sekund : '); readln(n); i : = n div 60; writeln('minut : ',i); end.
Ответ дал: Гость
Var m: array[1..15] of real; i: integer; n: real; begin randomize; for i: =1 to 15 do begin m : =random(20)-20; if( m< 0) then begin m: =sqr(m); end;
Ответ дал: Гость
где-то в начале ii тысячелетия до нашей эры предки финикийцев изобрели алфавит.
само слово "алфавит" восходит к названиям первых финикийских букв: альфа "алеф" (бык) и бета "бет" (дом). финикийцы дали название каждой букве своего алфавита.
Популярные вопросы