4 года назад

Написать программу на языке Pascal которая выводит сумму первых 50 членов арифметической прогрессии,помогите пожалуйста

Знания

Информатика

1 ответ:

Kayot2809 [7]4 года назад

0 0

Var a,d,S:real;
begin
readln(a,d);
S:=(2*a+d*49)/2*49;
writeln(S);
end.

Читайте также

Даны два числа а и b. Вывести на экран квадрат каждого числа, в сообщении на экране должно быть видно, что это квадрат Помогите

K1r1gaya [1]

Var a,b: Integer;
begin
writeln('Введите число a:');
readln(a);
writeln('Введите число b:');
readln(b);
writeln(a,'² = ',a*a);
writeln(b,'² = ',b*b);
end.

0 0

4 года назад

В системном блоке компьютера установлены два устройства долговременной памяти разных типов классический винчестер HDD и твердоте

KnaginaEris [122]

В HDD используется медный диск и считывающая головка, а твердотельный накопитель SSD основан на микросхеме, т,е, у него флеш-память

0 0

4 года назад

Определите канал передачи данных использованных в предложенной топологии

polvad

Сеть типа кольцо, или кольцевая топология

0 0

4 года назад

Треугольник задан величинами своих углов и радиусом описанной окружности. Найти стороны треугольника . брать удобные значения и

alain15 [82]

Для радиуса описанной окружности имеется соотношение
$\displaystyle R= \frac{a}{2\sin A}=\frac{b}{2\sin B}=\frac{c}{2\sin C}; \\ \\ a=2R\sin A \\ b=2R\sin B \\ c=2R\sin C$

// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!

var
a,b,c,R,dA,dB,dC:real;
begin
Writeln('Введите углы A,B в градусах и радиус R');
Read(dA,dB,R);
dC:=180-dA-dB;
a:=2*R*sin(dA*Pi/180);
b:=2*R*sin(dB*Pi/180);
c:=2*R*sin(dC*Pi/180);
Writeln('Угол C: ',dC:0:2);
Writeln('a=',a:0:5);
Writeln('b=',b:0:5);
Writeln('c=',c:0:5)
end.

Пример
Введите углы A,B в градусах и радиус R
30 70 50.0
Угол C: 80.00
a=50.00000
b=93.96926
c=98.48078

0 0

4 года назад

Сколько секунд потребуется модему, передающему информацию со скоростью 19200 бит/с, чтобы передать 150 страниц текста в 35 строк

Жанна7771987

Так, для начала узнаем сколько всего символов в тексте, для этого перемножаем количество страниц, количество строк и символов в строке 150*35*50 = 262500 (общее количество символов), потом переводим скорость в байты 19200/8=2400. И делим 262500 на 2400 и получаем 109,375, так как ответ нужен целым числом, округляем и получаем 110. Надеюсь помог)

0 0

4 года назад