Интернет , сон , игры , что-то , ещё что-то
Var
x, y, z, k: integer;
Begin
writeln('Введите двухзначное число');
read(x);
y:=x div 10;
z:=x mod 10 ;
k:=y+z;
writeln('Сумма цифр: ',k);
End.
program asd;
uses crt;
var
a,b,c:integer;
begin
writeln('Введите 3 числа');
readln(a); readln(b); readln(c);
if (a<b) and (a<c) then
begin
writeln('Минимальное ', a);
end
else
begin
if (b<c) then writeln('Минимальное ', b)
else writeln('Минимальное ', c);
end;
end.
Var a:array[1..100]of integer;
nol,chet,nechet,i,n:integer;
begin
readln(n);
for i:=1 to n do begin
readln(a[i]);
if (a[i] mod 2=0)and(a[i]<>0) then chet:=chet+1;
if (a[i] mod 2=1) then nechet:=nechet+1;
if a[i]=0 then nol:=nol+1;
end;
writeln('четных :',chet,' ','нечетных :',nechet,',' ',нулевых :',nol);
<span>end.</span>
1. Норберт Винер - американский ученый, основоположник кибернетики и теории искусственного интеллекта. У него была идея о необходимости создании единой науки, изучающей процессы хранения и переработки информации, управления и контроля.
2.Клод Шеннон - американский инженер, является основателем теории информации, нашедшие применения в современных высокотехнологических системах связи. Предложил использовать слово бит для обозначения информации.
3. В 1962 году, был придуман Тедом Нельсоном, а опубликован в 1965 году
4. Официально годом рождения WWW можно считать 1989 год. Изобретатель Тим Бернс-Ли
5.Эйлер- ученый математик,астроном, родился в 1707 году в семье базельского пастора Пауля Эйлера