Регистрация
maksimananchenko
19.10.2020 06:57
Информатика
Есть ответ 👍

Какие инструменты программы SketchUp Make можно применить при создании этих рисунков

136
346
Посмотреть ответы 1

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

elnur22
elnur22
4,6(41 оценок)
Паскаль. var a: array [1..10] of integer; begin writeln(' введите 10 элементов массива через пробел'); i: =1; repeat read(a[i]); i: =i+1; until i> 10; k: =0; for i: =1 to 10 do if a[i]< 0 then begin k: =k+1; write(i, '  '); end; writeln; if k=0 then write('в массиве нет отрицательных элементов') else write('в массиве ',k,' отрицательных элементов'); readln; end.

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