Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program qwerty; uses crt; var a: real; beginclrscr; writeln('введите количество миль'); readln(a); a: = a*1.6; writeln('кол-во киллометров - ',a: 2: 2); readkey; end.
1+2+3-4+5-6=1
1+2+3+4/5+6-7=1
1+2+3-4+5-6+7/8=1
var
i,n: integer;
begin
readln(n);
for i: =1 to n-1 do write(i*i: 5);
end.
сохранить информацию о наблюдаемом объекте
передать информацию о нём другим людям
испытать на модели работу объекта ,если испытание объекта-оригинала опасно или дорого
Популярные вопросы