Irinalobanowa
?>

1)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: var i, a, b: integer; begin b := 20; a := 5; for i:=1 to 5 do begin a := a + 1; write( a ); end; end. 2)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: b:=0; while a<>0 do begin a:=a div 10; h:=b*10+a mod 10; end; write(h); если а=13305? 3)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: var i, a, b: integer; begin b := 18; a := 8; repeat a := 2*a + 1; write( a); until (a>b) end. 4)Дана последовательность операторов: a:=1; b:=1; while a+b<6; b:=b+2*a; end; s:=a+b сколько раз будет повторен цикл? 5)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: var i, a, b: integer; begin b := 8; a := 3; while (a <= b) do begin a := a *2+1 ; write(a ); end; end.

Информатика

Ответы

k-alexey9

Объяснение:

1) так как мы выводим а, а каждый раз увеличивается на один, мы увидим

6 7 8 9 10

2) 0

3) 17, 35

4) 2 раза

5) 7, 15

Yevgenii_Gurtovaya1532
// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
  var k:=0;
  var n:=ReadInteger();
  var nmax:=0;
  while n<>0 do begin
    Inc(k);
    if n mod 10 = 0 then
      if n>nmax then nmax:=n;
    n:=ReadInteger()  
    end;
  var cntrl:=ReadInteger();
  Writeln('Получено ',k,' чисел');
  Writeln('Полученное контрольное значение: ',cntrl);
  Writeln('Вычисленное контрольное значение: ',nmax);
  if cntrl=nmax then Writeln('Контроль пройден')
  else Writeln('Контроль не пройден')
end.

Тестовое решение:
53
16
40
9
10
32
74
0
40
Получено 7 чисел
Полученное контрольное значение: 40
Вычисленное контрольное значение: 40
Контроль пройден
ekaterinkat

1)многофункциональное электронное програмно управляемое устройство для работы с информацией

2)сканер

3)тактовой частоты процессора

4)Программа - это последовательность… *

команд для компьютера

5)внешняя память

6)в двоичном коде

7)Принтер - устройство кодирования

8)Операционная система - это программы, управляющие работой компьютера

9)программа, обеспечивающая работу устройства компьютера

10)а) программа для обработки информации без знания программирования

11)г) в оперативной памяти

12)аппаратным интерфейсом

13)в) рисунков и фотографий

14)пользовательский интерфейс

15)Логический диск

16)вредоносная программа нанести ущерб данным на копьютере или вывести его из стро

17)Графическим файлам

18)Один любой допустимый символ

19)C

20)Файловая система

21)клавиатура, джойстик,монитор,мышь

22)C:\Работа1

23)-

24)-

25)расширение

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: var i, a, b: integer; begin b := 20; a := 5; for i:=1 to 5 do begin a := a + 1; write( a ); end; end. 2)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: b:=0; while a<>0 do begin a:=a div 10; h:=b*10+a mod 10; end; write(h); если а=13305? 3)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: var i, a, b: integer; begin b := 18; a := 8; repeat a := 2*a + 1; write( a); until (a>b) end. 4)Дана последовательность операторов: a:=1; b:=1; while a+b<6; b:=b+2*a; end; s:=a+b сколько раз будет повторен цикл? 5)Что будет выведено на экране монитора после выполнения следующего фрагмента программы: var i, a, b: integer; begin b := 8; a := 3; while (a <= b) do begin a := a *2+1 ; write(a ); end; end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

pbttehnology
alexseyzyablov
nunabat457
marinakmaa86
alex091177443
puchkovajulia
Blekjek730
ksenia15-79
yurievaalxndra55
e-s-i-k
vnolenev
notka19746
tigran87-87
ngz55
menesmir