Кнопка это insert а краткая запись соответственно ins
Камбуз
Кубрик
Склянки
Швартовы
Лкорь
Я в этом не особо разбираюсь
Var A,i,k:integer;
Begin
Write('Введите 10 целых чисел: ');
k:=0;
For i:= 1 to 10 do
Begin
Read(A);
if A>0 then k:=k+1
End;
Write('Количество положительных: ',k);
End.
А) совокупность всех программ- программное обеспечение. б) операционная система. Сорри, но 3-е я и сам не решил... Такое же задание нам задали...
Черный.
дан 1 красный, 1 зеленый , 1 синий пиксель, смешав их всех в равных пропорциях получаем черный цвет, учитывая то что яркость 0