program ms; uses crt; var a: array [1..10] of integer; l,k,s,i: longint; beginclrscr; writeln('введите 10 элементов массива'); for i: =1 to 10 dobegin readln(a[i]); if a[i]< 0 then l: =l+a[i]; if a[i]> 0 then k: =k+a[i]; end; s: =l*k; writeln(s); readkey; end.
Ответ дал: Гость
var alpha: real;
begin
read(alpha);
if alpha > 90 then write("tupougolnyj");
if alpha = 90 then write("prjamougolnyj");
if alpha < 90 then write("ostrougolnyj");
end.
Ответ дал: Гость
какой графический редактор? paint? кажется что подразумевается не 7 виндоуз, потому поэксперементировать трудно
не знаю какое 3 заполнение там подразумевается - у меня пастель (сама не знаю что это)
при удерживании шифта рисуются линии только с шагом 45 градусов, те только горизонтальные и вертикальные и диагональные
но по интуиции мне почемуто кажется что должно было получится солнышко
Популярные вопросы