В первый час работы рабочий изготавливает а деталей,за каждый последующий час- на d деталей больше,чем за предыдущий. Разработайте программу,которая

+ 0 -

Alilov

01 марта 2014 г., 4:18:02 (10 лет назад)

Program A3;vara,b,c,i:integer;beginwriteln('Vvedi kol-vo detaley v chas');readln(a);writeln('Vvedi na skolko yvelichitsya kol-vo detaley');readln(b);writeln('V 1 chas on sdelaet ',a,' detaley');for i:=2 to 8 do begina:=a+b;writeln('V ',i,' chas on sdelaet ',a,' detaley');end;end.

+ 0 -

Olesyaurumbaeva

01 марта 2014 г., 6:09:34 (10 лет назад)

Точку с запятой конечно же надо поставить)

+ 0 -

Nikita2039

01 марта 2014 г., 8:28:09 (10 лет назад)

Это чтобы он не закрывался мгновенно, (если будет напишите как я посоветовал) если все будет хорошо то можно не трогать программу)

+ 0 -

GANJAMAN

01 марта 2014 г., 10:13:44 (10 лет назад)

Есть другой вариант, чтобы он выдавал сразу за 8 часов, без отчитывания за каждый час)

+ 0 -

Dimmkdsru

01 марта 2014 г., 11:34:47 (10 лет назад)

Program A3;
var
a,b,c,i:integer;
begin
writeln('Vvedi kol-vo detaley v chas');
readln(a);
writeln('Vvedi na skolko yvelichitsya kol-vo detaley');
readln(b);
for i:=2 to 8 do begin
a:=a+b;
end;
writeln('za 8 chasov on sdelaet ',a,' detaley');
end.

+ 0 -

Krisacer0012

01 марта 2014 г., 14:01:28 (10 лет назад)

если помог нажми спасибку (голуб кнопка)))