Const
R=14;
var
i,k:integer;
W:array[1..R] of longint;
begin
Write('Введите число членов последовательности (1-',R,'): ');
Readln(k);
if (k<1) or (k>R) then Writeln('Вы ввели неверное значение')
else begin
Write('Члены последовательности: 1');
w[1]:=1;
for i:=2 to k do
begin
w[i]:=5*w[i-1];
Write(', ',w[i])
end;
Writeln
end
end.
<em><u>Тестовое решение:</u></em>
Введите число членов последовательности (1-14): 14
Члены последовательности: 1, 5, 25, 125, 625, 3125, 15625, 78125, 390625, 1953125, 9765625, 48828125, 244140625, 1220703125
ЕСЛИ А=26; b=6
1.А MOD b+b; 26/6+6=?
(НАДЕЮСЬ ТЫ ЗНАЕШЬ КАК РЕЗДЕЛИТЬ И ПРИБАВЛЯТЬ) (
(DIV-ЭТО САМ ОТВЕТ ОТ ДЕЛЕНИЯ; MOD-ЭТО ОСТАТОК ПРИ ДЕЛЕНИИ)
10.С:=10 mod(b+1); 10/(6+1)=6+1=7;10/7=1,3
DIV=1
MOD=3
ДУМАЮ ТЫ СПРАВИШЬСЯ)
Program prim;
uses crt;
var
y,x,a,modul,koren,kvad:real;
begin
writeln('Решаем пример:');
kvad:=sqr(x);
koren:=sqrt(x*a);
modul:=abs(a);
y:=(kvad-koren)/modul;
writeln(y);
<span>end.</span>
Для человечества имеет наибольшее значение информация, содержащая новые полученные знания в этом веке, новые произведения искусства, а также всё, что связано с нашей культурой. Потому что это очень важно, передать наши знания другим поколениям и рассказать о культуре нашего времени.
Для отдельного человека скорее важны его личные данные. Хотя многие люди тоже хранят информацию о своей жизни, а потом передают её другому поколению для того чтобы у семьи была история.
