Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
паскаль, одномерный массив
var a: array [1..6] of integer; i, max: integer;
begin
for i: =1 to 6 do read(a[i]);
max: =a[1];
for i: =1 to 6 do
if a[i]> max then max: =a[i];
writeln(max); readln; end.
у дальних планет больше спутников по причине их большей массы. чем больше масса планеты - тем большую массу она притягивает и захватывает.
2.поиск текста на странице
4.изменение кодировки текста на странице
8.изменение размера шрифта для текста страницы
var alpha: real;
read(alpha);
if alpha > 90 then write("tupougolnyj");
if alpha = 90 then write("prjamougolnyj");
if alpha < 90 then write("ostrougolnyj");
end.
Популярные вопросы