vorobyeva6428

17.07.2021

сделать трассировку программы. var a, sum, npos, nneg: integer; begin sum := 0; npos := 0; nneg := 0; readln(a); while a <> 0 do begin sum := sum + a; if (a < 0) then nneg := nneg + 1 else npos := npos + 1; readln(a); end; writeln(sum); writeln (npos - nneg) end.

Информатика

Ответить

Ответы

Borg Fedak1162

17.07.2021

2. 1

Объяснение:

УДАЧИ™™™™™™ ¯(°_o)/¯

сделать трассировку программы. var a, sum, npos, nneg: integer; begin sum := 0; npos := 0; nneg := 0

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

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

сделать трассировку программы. var a, sum, npos, nneg: integer; begin sum := 0; npos := 0; nneg := 0; readln(a); while a <> 0 do begin sum := sum + a; if (a < 0) then nneg := nneg + 1 else npos := npos + 1; readln(a); end; writeln(sum); writeln (npos - nneg) end.

▲

сделать трассировку программы. var a, sum, npos, nneg: integer; begin sum := 0; npos := 0; nneg := 0; readln(a); while a <> 0 do begin sum := sum + a; if (a < 0) then nneg := nneg + 1 else npos := npos + 1; readln(a); end; writeln(sum); writeln (npos - nneg) end.

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Screen=pygame.display.set_mode((500 400)) выполняет действия?

Дано число 235000000. данное число можно представить в виде 23, 5⋅10

Сообщение, записанное буквами из 128-символьная алфавита , содержит 75 символов какой объем информации оно несёт?

1.Укажите программы растровой графики. Один вариант.Paint, PhotoshopCorelDraw, Photo-BrushInkscape, CorelDrawGimp, Inkscape, CorelDrawнет верного ответа2.Укажите программы векторной графики. Один...

Перевести из десятичной системы в двоичную следующие числа: 892. и 1478. перевести из двоичной системы в десятичную числа: 11111101, 110001, 1111, 1110211

какие значения примут переменные А и В после выполнения следующих строчек кода. фото прилагается

Представьте десятичные числа в беззнаковом 8-разрядном формате а)59 б)126

Массив x = [4 3 2 1 5] обработан с цикла for i: =1 to 5 do begin x[i]: = x[i]+2 end; что выведен на экран оператор write( x[5] );

Переделать слова так чтобы они подходили к слову бег море миг - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - шаг - - - - - - - суша - - - век

2. что будет выведено на экран в результате var a : array (1..20) of integer; i, m, n, x: integer; begin for i: = 1 to 20 do begin a (i) : = (i + 4) mod 5; end; m : = a (1); n : = a (1); f...

Выполни! составьте общие правила работы с текстовым редактором.собери дополнительную информацию о текстовых редакторах из сетиинтернет.подумай!

сделать трассировку программы. var a, sum, npos, nneg: integer; begin sum := 0; npos := 0; nneg := 0; readln(a); while a &lt;&gt; 0 do begin sum := sum + a; if (a &lt; 0) then nneg := nneg + 1 else npos := npos + 1; readln(a); end; writeln(sum); writeln (npos - nneg) end.

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Screen=pygame.display.set_mode((500 400)) выполняет действия?

Дано число 235000000. данное число можно представить в виде 23, 5⋅10

Сообщение, записанное буквами из 128-символьная алфавита , содержит 75 символов какой объем информации оно несёт?

1.Укажите программы растровой графики. Один вариант.Paint, PhotoshopCorelDraw, Photo-BrushInkscape, CorelDrawGimp, Inkscape, CorelDrawнет верного ответа2.Укажите программы векторной графики. Один...

Перевести из десятичной системы в двоичную следующие числа: 892. и 1478. перевести из двоичной системы в десятичную числа: 11111101, 110001, 1111, 1110211

какие значения примут переменные А и В после выполнения следующих строчек кода. фото прилагается​

Представьте десятичные числа в беззнаковом 8-разрядном формате а)59 б)126

Массив x = [4 3 2 1 5] обработан с цикла for i: =1 to 5 do begin x[i]: = x[i]+2 end; что выведен на экран оператор write( x[5] );

Переделать слова так чтобы они подходили к слову бег море миг - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - шаг - - - - - - - суша - - - век

2. что будет выведено на экран в результате var a : array (1..20) of integer; i, m, n, x: integer; begin for i: = 1 to 20 do begin a (i) : = (i + 4) mod 5; end; m : = a (1); n : = a (1); f...

Выполни! составьте общие правила работы с текстовым редактором.собери дополнительную информацию о текстовых редакторах из сетиинтернет.подумай! ​

сделать трассировку программы. var a, sum, npos, nneg: integer; begin sum := 0; npos := 0; nneg := 0; readln(a); while a <> 0 do begin sum := sum + a; if (a < 0) then nneg := nneg + 1 else npos := npos + 1; readln(a); end; writeln(sum); writeln (npos - nneg) end.

какие значения примут переменные А и В после выполнения следующих строчек кода. фото прилагается

Выполни! составьте общие правила работы с текстовым редактором.собери дополнительную информацию о текстовых редакторах из сетиинтернет.подумай!