Вы имеете в виду документы Photoshop?
Если да,то это формат PSD,открывается только с Ps.
Тебе нужен формат TIFF - это чисто для сохранения изоб-ия со слоями
Var a,b,c:real;
begin
writeln ('Введите стороны треугольника');
read (a,b,c);
if ((a + b) > c) and ((a + c) > b) and ((b + c) > a) then writeln ('Существует')
else writeln ('Не существует');
end.
Первой электронной вычислительной машиной принято считать машину ENIAC (Electronic Numerical Integrator and Computer - электронный числовой интегратор и вычислитель) , разработанную под руководством Джона Моучли и Джона Экера в Пенсильванском университете в США. ENIAC содержал 17000 электронных ламп, 7200 кристаллических диодов, 4100 магнитных элементов и занимал площадь в 300 кв. метром. Он в 1000 раз превосходил по быстродействию релейные вычислительные машины и был построен в 1945 г.
Первой отечественной ЭВМ была МЭСМ (малая электронная счетная машина) , выпущенная в 1951 г. под руководством Сергея Александровича Лебедева. Её номинальное быстродействие — 50 операций в секунду.
1. Программа "Анкета":
program anketa;
var a,b,d:string;
c:char;
begin
writeln('Введите ваши имя и фамилию в именительном падеже: ');
readln(a,b);
writeln('Введите букву класса: ');
readln(c);
writeln('Введите ваше хобби: ');
readln(d);
writeln('Меня зовут ',a,' ',b,';');
writeln('Я учусь в 7 "',c,'" классе гимназии 524;');
writeln('Моё хобби - ',d,';');
writeln('Периметр прямоугольника равен 30');
writeln('<span>Сегодня ярко светит солнце!</span>')
end.
2. Программа "Опросы":
program oprosy;
var a,b,c:integer;
d:real;
begin
writeln('Введите ваши оценки по пятибалльной шкале: ');
readln(a,b,c);
d:=(a+b+c)/3;
writeln('Ваша средняя оценка за тесты - ',d,'.');
end.
3. Программа "Периметр прямоугольника":
program perimetr;
var a,b,c:integer;
begin
writeln('Введите стороны прямоугольника: ');
readln(a,b);
c:=(a+b)*2;
writeln('Периметр прямоугольника = ',c,'.');
end.