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

Построить таблицы. можно написать на листочке и в ответах скинуть скрин. ​

👇
Открыть все ответы
Ответ:
annaglukhikh07
annaglukhikh07
10.02.2020

1:

program prog;

var i,n,s,a:integer;

var chk:boolean;

begin

   chk:=False;

   s:=1;

   write('Введите количество вводимых чисел: '); readln(n);

   for i:=1 to n do

   begin

       write('Введите ', i, '-е число: '); readln(a);

       if i mod 2 = 0 then

       begin

           s:=s*a;

           chk:=True;

       end;

   end;

   if chk = False then s:=0;

   write('Произведение чётных членов введённой последовательности равно ', s);

end.

2:

program fib;

var

   F1,F2,n,i :Integer;

begin

   write('Введите количество чисел Фибоначчи: '); readln(n);

   F1:=1;

   F2:=1;

   For i:=1 to n do

   begin

       if i>2 then

       begin

           F1:=F1+F2;

           F2:=F1-F2;

       end;

       write(F1, ' ');

   end;

end.

4,5(27 оценок)
Ответ:
jamikzara
jamikzara
10.02.2020
Microsoft Windows - IBM тәрізді компьютерлерде графикалық интерфейсті қолдануды кеңінен жүзеге асырған, қазіргі заман талабына сай жасалған операциялық орта. Оның дамытылған нұсқалары түрінде Windows NT, Windows 2000 сияқты операциялық жүйелер кеңінен қолданылуда.
shareAdvocacyHobbyist іUser spaceMicrokernelLoadable kernel moduleDevice driverProcess control switchScheduling algorithmsComputer -robinFixed-priority preemptiveMultilevel feedback queueShortest job nextMemory management and
resource protectionSecurity ringsMemory protectionVirtual memoryPagingSegmentation fault / Bus errorGeneral protection OSMorphOSOS/2 conceptsBoot loaderLive CDLive USBPXEAPIVirtual file systemVirtual tape libraryComputer networkOS shell CLITUIGUIVUI HAL
4,8(1 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ