Program p452; var a,b,m,d:integer; begin Write('Введите размеры форточки (а,b) в см: '); Read(a,b); Write('Введите диаметр головы Васи в см: '); Read(d); if a<b then m:=a+2 else m:=b+2; { +2 - это зазор по 1 см с обоих сторон } if d<=m then Writeln('Голова проходит') else Writeln('Голова не проходит') end.
Тестовое решение: Введите размеры форточки (а,b) в см: 25 40 введите диаметр головы Васи в см: 23 Голова проходит
program p453; var a,b,c,x,y,m1,m2,n1,n2:integer; begin Write('Введите размеры кирпича в см (a,b,c): '); Read(a,b,c); Write('Введите размеры отверстия в см (x,y): '); Read(x,y); if a<b then if a<c then begin m1:=a; if b<c then m2:=b else m2:=c end else begin m1:=c; m2:=a end else if b<c then begin m1:=b; if a<c then m2:=a else m2:=c end else begin m1:=c; m2:=b end; if x<y then begin n1:=x; n2:=y end else begin n1:=y; n2:=x end; if (m1<=n1) and (m2<=n2) then Writeln('Кирпич пройдет в отверстие') else Writeln('Кирпич не пройдет в отверстие') end.
Тестовое решение: Введите размеры кирпича в см (a,b,c): 10 4 12 Введите размеры отверстия в см (x,y): 5 9 Кирпич не пройдет в отверстие
program p454; var a,b:integer; begin Write('Введите значения а и b: '); Read(a,b); Writeln('Размеры чемодана ',3*a,'x',2*a,'x',a); Writeln('Размеры коробки ',3*b,'x',2*b,'x',b); if b<a then Writeln('Коробка поместится в чемодан') else Writeln('Коробка не поместится в чемодан') end.
Тестовое решение: Введите значения а и b: 18 16 Размеры чемодана 54x36x18 Размеры коробки 48x32x16 Коробка поместится в чемодан
1)Итак, начнем с определения. Что же такое сайт. Это совокупность документов с гипертекстовой информацией, доступной в Интернете. Информационная система, площадка, на которой человек (администратор) выкладывает какие-то сведения, а посетитель страницы может ее воспринять. Все очень сложно. Соглашусь. Давайте как-то попроще.
Любой сайт – это папка с файлами, написанная при языков программирования. Если вы откроете любой из них, то ровным счетом ничего не поймете. Благо, у нас есть браузер, который считывает информацию и предоставляет ее в готовом виде, доступном для восприятия любому пользователю. Я уже подробно описывал для чего нужны браузеры и как они работают, можете почитать эту информацию в этом блоге.
Из чего состоит сайт
Пока папка с сайтом находится на вашем компьютере, его никто не видит, для того, чтобы мир увидел ваш электронный ресурс его необходимо выложить на хостинг. В этом случае у публики будет к нему доступ. О том, что такое хостинг я тоже уже подробно рассказывал. Помимо хостинга у сайта должно быть еще и уникальное название (домен), в этом случае любой желающий сможет отыскать информацию о нем и получить доступ к нужной папке.
var
a,b,m,d:integer;
begin
Write('Введите размеры форточки (а,b) в см: ');
Read(a,b);
Write('Введите диаметр головы Васи в см: ');
Read(d);
if a<b then m:=a+2 else m:=b+2;
{ +2 - это зазор по 1 см с обоих сторон }
if d<=m then Writeln('Голова проходит')
else Writeln('Голова не проходит')
end.
Тестовое решение:
Введите размеры форточки (а,b) в см: 25 40
введите диаметр головы Васи в см: 23
Голова проходит
program p453;
var
a,b,c,x,y,m1,m2,n1,n2:integer;
begin
Write('Введите размеры кирпича в см (a,b,c): ');
Read(a,b,c);
Write('Введите размеры отверстия в см (x,y): ');
Read(x,y);
if a<b then
if a<c then begin
m1:=a;
if b<c then m2:=b else m2:=c
end
else begin m1:=c; m2:=a end
else
if b<c then begin
m1:=b;
if a<c then m2:=a else m2:=c
end
else begin m1:=c; m2:=b end;
if x<y then begin n1:=x; n2:=y end
else begin n1:=y; n2:=x end;
if (m1<=n1) and (m2<=n2) then Writeln('Кирпич пройдет в отверстие')
else Writeln('Кирпич не пройдет в отверстие')
end.
Тестовое решение:
Введите размеры кирпича в см (a,b,c): 10 4 12
Введите размеры отверстия в см (x,y): 5 9
Кирпич не пройдет в отверстие
program p454;
var
a,b:integer;
begin
Write('Введите значения а и b: '); Read(a,b);
Writeln('Размеры чемодана ',3*a,'x',2*a,'x',a);
Writeln('Размеры коробки ',3*b,'x',2*b,'x',b);
if b<a then Writeln('Коробка поместится в чемодан')
else Writeln('Коробка не поместится в чемодан')
end.
Тестовое решение:
Введите значения а и b: 18 16
Размеры чемодана 54x36x18
Размеры коробки 48x32x16
Коробка поместится в чемодан
1)Итак, начнем с определения. Что же такое сайт. Это совокупность документов с гипертекстовой информацией, доступной в Интернете. Информационная система, площадка, на которой человек (администратор) выкладывает какие-то сведения, а посетитель страницы может ее воспринять. Все очень сложно. Соглашусь. Давайте как-то попроще.
Любой сайт – это папка с файлами, написанная при языков программирования. Если вы откроете любой из них, то ровным счетом ничего не поймете. Благо, у нас есть браузер, который считывает информацию и предоставляет ее в готовом виде, доступном для восприятия любому пользователю. Я уже подробно описывал для чего нужны браузеры и как они работают, можете почитать эту информацию в этом блоге.
Из чего состоит сайт
Пока папка с сайтом находится на вашем компьютере, его никто не видит, для того, чтобы мир увидел ваш электронный ресурс его необходимо выложить на хостинг. В этом случае у публики будет к нему доступ. О том, что такое хостинг я тоже уже подробно рассказывал. Помимо хостинга у сайта должно быть еще и уникальное название (домен), в этом случае любой желающий сможет отыскать информацию о нем и получить доступ к нужной папке.