Верны ли определения? А) Агенты, которые работают с небольшими промышленными предприятиями и занимаются сбытом всей

272

313

Посмотреть ответы 2

Ответы на вопрос:

lzhaleeva

Другие предметы

4,8(71 оценок)

Правильные ответы к тесту выделены
Тест прошел проверку
ставим +1 к ответу)

Ychenik1354

Другие предметы

4,6(87 оценок)

program arsuma;
var a1,an,d,Sum:real;
n:integer;
begin
writeln ('vvedite pervyy chlen');
readln (a1);
writeln ('vvedite raznost (a ne znamenatel)))');
readln (d);
writeln ('vvedite kolichestvo chlenov');
readln (n);
{vychislenie n-nnogo chlena}
an:=a1+(n-1)*d;
{vychislenie summy}
Sum:=(a1+an)*n/2;
writeln ('summa =',Sum:3:3);
readln
end.