Все категории

4 года назад

Люди плиииз . Помогите подобрать какое-то чудо техники ( не смартфон ) для пересказа . Дам 25 баллов

Знания

Информатика

2 ответа:

Даша37134 года назад

0 0

Машина времени. Компьютер. Телевизор.

ooooooL4 года назад

0 0

Адронний колайдер найкраща тема

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

Помогите, пожалуйста, написать программу в Паскале. Напишите программу вычисления выражения: s=1!+2!+3!+…+n! Используйте функци

андрей14897

<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

function F(n: integer):int64 :=

n <= 1 ? 1 : 2.To(n).Aggregate(int64(1), (p, q)-> p * q);

begin

Range(1, ReadInteger('n=')).Select(t -> F(t)).Sum.Println

end.

0 0

3 года назад

Дан массив из чесел, массив 3х3 (двумерный). Найти сумму элементов главной диагонали.Исходный массив вывести на экран . Паскаль(

Engelo [3]

<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>

begin

var a := MatrRandom(3, 3, -99, 99);

a.Println(4); Writeln(4 * a.ColCount * '-');

var s := 0;

for var i := 0 to 2 do s += a[i, i];

Println('Сумма элементов главной диагнонали:', s)

end.

<h2> 16 19 97</h2><h2> 11 -97 14</h2><h2> 24 40 -38</h2><h2>------------</h2><h2>Сумма элементов главной диагнонали: -119 </h2>

0 0

4 года назад

Помогите, прогу, пожалуйста, прошу все написать, пожалуйста

petr111

45 = 101101 это первое

0 0

4 года назад

Срочно 50 баллов напишите программу которая подсчитает сумму натуральных чисел от 1 до n

vados1984

Var i,s,n: Integer;
begin
readln(n);
for i := 1 to n do begin
s := s + i;
end;
writeln(s);
end.

0 0

4 года назад

Найди объём шара, если длина радиуса вводится с клавиатуры. Объём шара вычисляется по формуле: V=4/3*π⋅R3. Опиши константу: π=3,

PANTHERSI1992 [4]

Паскаль:
<span>const pi=3.14;
var r,v:real;
begin
write('R = ');
readln(r);
v:=4/3*pi*r*r*r;
writeln('V = ',v:4:1);
end<span>.

Пример:
</span><span>R = 4
V = 267.9</span></span>

0 0

4 года назад

Прочитать ещё 2 ответа