Cls
input a
b=a>=10 and a<=99
print b
Var i,p:integer; beginp:=1;for i:= 20 to 50 doif(i mod 5 = 0) then p:=p*i;writeln('Произведение чисел кратных 5: 'p);end.
Вся информация, поступающая к человеку, состоит из сигналов. Известно, что таких сигналов человек получает значительно больше, чем в состоянии обработать его мозг. Человек так устроен, что он:
• не может принять непонятную ему информацию;
• необъективен, то есть зачастую воспринимает информацию не такой, какая она есть, а такой, какой она ему кажется;
• быстро устаёт и может ошибаться, обрабатывая информацию;
• не может долго хранить информацию: если не закреплять знания постоянными упражнениями, информация очень быстро забывается.
Справляться с этими проблемами человеку помогает компьютер.
Компьютер имеет дело с данными. Данные — это информация, представленная в форме, пригодной для обработки компьютером. Это могут быть числа и буквы, рисунки и звуки. За малое время компьютер способен обработать большое количество данных.
Компьютер обрабатывает данные по заданным инструкциям и создаёт информацию для человека. Этим работакомпьютера похожа на работу человеческого мозга.
В отличие от человека компьютер не может думать. Он выполняет только то, что ему предписано. Часто говорят о компьютерных ошибках, но, как правило, это ошибки людей, разработавших неверные инструкции для компьютера.
Сегодня компьютер является незаменимым помощником человека в любой сфере деятельности
1)
uses crt;
const
n=5;m=7;
var
i,j,s:integer;
a:array[1..n,1..m]of integer;
begin
randomize;
clrscr;
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=random(40)-19;
write(a[i,j]:4);
end;
writeln;
end;
writeln;
for j:=1 to m do
begin
s:=0;
for i:=1 to n do
s:=s+a[i,j];
writeln ('j:',j,' ', s);
writeln;
end;
end.<span>
</span>