Регистрация
lenayun
15.04.2023 20:19
Информатика
Есть ответ 👍

составить блок схему по этому коду:

165
209
Посмотреть ответы 1

Ответы на вопрос:

JaLOX22848
JaLOX22848
4,7(51 оценок)
Напишу только программу. var a,b,c,x,i,s1,s2: integer; begin   s1: =0; s2: =0;   c: =0; b: =0;   for i: =1 to 3 do     begin     write('x',i,'=');     readln(x);     if x> 0 then s1: =s1+x;     if x< 0 then s2: =s2+x;     c: =b; b: =a; a: =x;     end;   if s1> s2 then s1: =c-b   else s1: =c*b*a;   writeln('ответ: ',s1); end.

Популярно: Информатика