Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var kol,a,b,c: longint;
begin
read(a,b,c);
if a< 0 then kol: =kol+1;
if b< 0 then kol: =kol+1;
if c< 0 then kol: =kol+1;
write(kol);
end.
радиосвязь!
попов!
картинка должна быть в папке с программой и быть в формате bmp
usesgraphabc;
varn: string; b: picture; s: integer;
beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.
2^3 = 8 цветов (скорее всего оттенки серого)
Популярные вопросы