Регистрация
Ehmedov
08.03.2022 10:02
Информатика
Есть ответ 👍

Найдите информацию в Интернете о различных мар ках 3D-принтеров. Запишите найденную информацию в тетрадь

157
338
Посмотреть ответы 1

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

кпеп
кпеп
4,6(31 оценок)
Const n=70; var a: array[1..n] of integer; i,j,x,y: integer; begin   for i: =1 to n do     readln(a[i]);   x: =0;   for i: =1 to n-1 do     if (a[i] mod 2)< > (a[i+1] mod 2) then       if (a[i]+a[i+1])> x then x: =a[i]+a[i+1];   writeln('max=',x); end.

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