sakulich05
04.11.2020 15:18

Составьте блок-схему алгоритма вычисления s=m(m+1) (m+ (m+n), где m, n - заданные натуральные числа.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
kornilov1001
05.07.2022 00:46

зміна масштабу без втрати якості і практично без збільшення розмірів вихідного файлу;

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

файл з векторним зображенням має набагато менший розмір порівняно з растровим зображенням;

малюнок має високу якість при друкуванні, особливо це добре помітно при високоякісному друці;

можливість редагування всіх частин векторного зображення;

простий експорт векторного малюнка в растровий.

0,0(0 оценок)
Ответ:
Yulia14929
23.07.2022 05:50

procedure IN1(var a,b:real;n:integer;var y:real);

var

p:real;

i:integer;

begin

y:=1;

for i:=1 to n do

begin

p:=exp(b*ln(a));

y:=p*y;

end;

end;

procedure IN2(var a, b:real; n:integer; var y1:real);

var

p:real;

i:integer;

begin

y1:=0;

for i:=1 to n do

begin

p:=exp(b*ln(a));

y1:=y1+p;

end;

end;

begin

write(' Введите a, b,n');

readln(a,b,n);

IN1(a,b,n,y2);

writeln('p1 ',y2:10:2);

writeln(' Введите c, b,m');

read(a,b,n);

IN2(a,b,n,y3);

writeln('s ',y3:10:2);

write(' Введите e, f,L');

readln(a,b,n);

IN1(a,b,n,y5);

writeln('p2 ',y5:10:2);

y6:=(y2+y3)/y5;

writeln(y6:8:3); end

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота