Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
программа на паскале:
program xxx;
var a, b: real;
begin
writeln('введите количество миль');
readln(a);
b: = a*1.6;
writeln('кол-во киллометров - ',b)
end.
program pr;
var i: integer;
mas: array[1..7]of integer;
for i: =1 to 7 do
writeln ('введите температуру ', i ,' сентября');
readln (mas[i]);
end;
for i: =1 to 7 do writeln (i, ' сентября температура была ' mas[i]);
readln;
Популярные вопросы