Program BP_Sasde;
Uses crt;
Var a:array[1..20] Of integer;
imax,imin,i:integer;
begin
Clrscr;
imin:=20;imax:=0;
for i:=1 to 20 do begin
a[i]:=random(1,20);
if a[i]>imax then imax:=a[i] else imin:=a[i];
writeln(a[i]);
end;
writeln('максимум = ',imax,' а минимум = ',imin);
end.
1833 год , Чарлз Бэббидж,Англия
Память находится в компьютере.
Солнце часть солнечной системы .
Автомобиль дороже велосипеда.
Колесо часть автомобиля.
Var
s: Int64;
i, n: byte;
begin
readln(n);
for i := 1 to n do
s += i;
writeln(s);
end.
Шифровка идет по первым буквам слова, то есть берем первую букву слова и буква которая стоит перед этой буквой в алфавите записывается в слово.Пример: улитка первая буква-у, перед «у» в алфавите стоит «т»,лев первая буква-л, перед ней в алфавите стоит «к», и так шифруется дальше, то есть ёж первая буква ё, перед ней в алфавите стоит «е»)
ответ: ТАК ДЕРЖАТЬ