program first; var i,a,b: integer; begin cls; read(a,b,i); if a< 0 then write(sqr(a));
if b< 0 then write(sqr(b));
if i< 0 then write(sqr(i))end.
Ответ дал: Гость
наиболее простым способом перехвата информации является подслушивание.
прослушивание телефона тоже способ перехвата информации.
перехватчики информации в сети с программ снифферов.
перехватчики информации в компьютере это компьютерные вирусы.
Ответ дал: Гость
правильно треугольник)
Ответ дал: Гость
картинка длжна быть в папке с программой и быть в формате bmp
uses graphabc;
var n: string; b: picture; s: integer;
begin writeln('введите расстояние до зеркала'); 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.
Популярные вопросы