М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
BlaBla552
BlaBla552
05.12.2020 19:04 •  Информатика

Яку архітектуру мають сучасні комп'ютери?​

👇
Ответ:
Dasha170105
Dasha170105
05.12.2020

Архітектура комп’ютера – це сукупність властивостей та характеристик, які розглядаються з точки зору користувача і які висвітлюють систему команд, типи даних керування пам’яттю, організацію введення-виведення. По іншому архітектура – це програмне забезпечення + апаратне. Також іноді під архітектурою розуміють функціональну організацію комп’ютера, тобто термін архітектура можна визначити як розподіл функцій, що реалізується системою за окремими її рівнями та точними позначеннями границь між її рівнями.

4,8(1 оценок)
Открыть все ответы
Ответ:
SteveDog86
SteveDog86
05.12.2020
program parampampam; 
uses crt; 
var 
i: integer; {счетчик} 
s: integer; 
begin 
clrscr; {очистка экрана} 
writeln ('Программа выводит числа от 1 до 99, сумма цифр которых равна числу S'); 
writeln ('Введите число S, от 0 до 18: '); 
{ввод числа S с проверкой на корректность} 
repeat 
readln (s); 
if (s>18) or (s<0) then 
writeln ('Неверный ввод. Повторите') 
until (s<=18) and (s>=0); 
{вывод нужных чисел на экран (цикл с предусловием)} 
for i := 1 to 99 do 
if ((i div 10) + (i mod 10) = s) then {div дает целую часть, mod - остаток от деления} 
write (i, ' '); 
repeat until keypressed; {пустой цикл для задержки экрана до нажатия клавиши} 
end.
4,5(81 оценок)
Ответ:
hadisvv99
hadisvv99
05.12.2020

Не знаю насколько это правильно, на Паскале никогда не программировал, но код скину:

Задача 1:

var a, b, c: integer;

begin

   readln (a);

   readln (b);

   readln (c);

   if a > b then

       if a < c then

           write (a);

   if a > c then

       if a < b then

           write (a);

   if b > a then

       if b < c then

           write (b);

   if b > c then

       if b < a then

           write (b);

   if c > a then

       if c < b then

           write (c);

   if c > b then

       if c < a then

           write (c);

   if a = b then

       a := b;

       if b = c then

           a := b;

           c := a;

   write (a);

readln

end.

Задача 2:

var a, b, c: integer;

begin

   readln (a);

   readln (b);

   readln (c);

   if a > b then

       if a > c then

           write (a);

   if b > a then

       if b > c then

           write (b);

   if c > a then

       if c > b then

           write (c);

   if a = b then

       a := b;

       if b = c then

           a := b;

           c := a;

   write (a);

readln

end.

4,7(68 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ