Регистрация
aisipat055
19.07.2021 13:41
Информатика
Есть ответ 👍

Какими особенностями обладает системная шина ЭВМ​

163
233
Посмотреть ответы 2

Ответы на вопрос:

sazonov30021
sazonov30021
4,6(8 оценок)

1. Он большой

2. Мощный

3. Калькулятор

4. Прездадачен для математических решений. (в основном их использовали космонавты ученые и программисты того времени)

5. извести своими большими размерами (в историй.его размер составлял примерно два автобуса стоящих на друг друге. Егор не сможет сдвинуть даже сильный качок)

Amer11111
Amer11111
4,7(67 оценок)

program z1;

uses crt;

var a,i: integer;

        p: longint;

begin

    clrscr;

      p: =1;  

      write('введите число а: ');

      readln(a);  

      for i: =a to 100 do  

          p: =p*a;

    writeln('произведение всех чисел от  ',a,'до 100: ',p);

    readkey;

end. 

 

program z2;

uses crt;

var s,i: integer;

i: =2; s: =0;

while(i< =98) do

    begin 

        s: =s+i;  

          i: =i+2;

end;

    clrscr;

      write('сумма последовательности: ',s);    

    readkey;

end. 

 

program z3;  

uses crt;

var a,i: integer;

begin     

      clrscr;

      a: =0;      

      for i: =100 to 999 do

          if ((i mod 5)=0 and (i mod 21)=0) then

                a: =a+1;                    

      write('количество 3-значных чисел делящихся без остатка на 5 и 21: ',a);  

    readkey;

end. 

 

program z4;  

uses crt;

var a,i,s: integer;

begin     

      clrscr;

        s: =10:  

        write('введите количество тренировочных дней: ');    

        readln(a);

          for i: =2 to a do

                s: =s+3;

        write('суммарное расстояние: ',s);        

readkey;

end. 

 

program z5;

uses crt;

var a,i,n,s: integer;    

begin     

      clrscr;

      write('введите количество отрядов: ');

      readln(n);  

      s: =0;  

 

      for i: =1 to n do

          begin

                write('введите количество детей в  ',i ,'-м отряде: ' );  

 

                readln(a);

                clrscr;  

                s: =s+a;

          end;      

    writeln;

    writeln('общее количество детей в лагере: ',s);

    readkey;

end. 

 

Популярно: Информатика