В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции - id1346866920221104 от hofferson 04.11.2022 16:01

Question

Информатика: В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций и порядок действий соответствуют правилам арифметики. Определите значение переменной b после выполнения алгоритма: а:=7 b:=3 а:=а-b^2 b:=a*8 В ответе укажите одно целое число — значение переменной b.

hofferson · Accepted Answer

Uses crt;

var mas: array [1..10] of integer;
i,a: integer;
begin
clrscr;
writeln('Input massive');
a:=0;
for i:=1 to 10 do
begin
readln(mas[i]);
if (i mod 2 =0) and (mas[i] < 0) then a:=a+1;
end;
writeln('Answer ',a);
end.

number 2

uses crt;

var mas: array [1..10] of integer;
i,a,k: integer;
begin
clrscr;
writeln('Input massive');
for i:=1 to 10 do
readln(mas[i]);
i:=1;
while (mas[i]<>0) and (i<10 ) do
i:=i+1;
k:=1;
if i < 10 then
begin
for a:=i to 10 do
k:=k*mas[a];
writeln(k);
end else
writeln('Nulya net');

end.

MOGZ ответил