Выполнить используя цикл while:  ввести с клавиатуры число. увеличивать переменную i до тех пор, пока она не станет равна введенному числу;  программа рассчитывает сумму цифр введенного пользователем числа.

1) var i,n: integer; begin i: =0; writeln('введите число'); readln(n); while i< > n do begin inc(i); writeln(i); end; end. 2) var i,n,x,count: integer; begin writeln('введите кол-во цифр'); readln(n); for i: =1 to n do begin writeln('введите ',i,' число'); readln(x); inc(count,x); end; writeln('сумма чисел: ',count); end.

конструктор автомобилей: проектирования

писатель: не один писатель сейчас использует даже тот самый word чтобы печатать там

бухгалтер: сдает отчеты через компьютер, тоже и в налоговой ну или еще где-то

врач: для различных анализов 

: те же нужные конференции, призентации и все такое делается на компьютере

 

 

  v=331+0,6*(-35)=310 м/c

v=331+0,6*30=349 м/c