Var i:integer;
begin
writeln('Дюймы См');
for i:=1 to 10 do
writeln(i:3,' ',2.54*i:5:2);
end.
Результат:
Дюймы См
1 2.54
2 5.08
3 7.62
4 10.16
5 12.70
6 15.24
7 17.78
8 20.32
9 22.86
10 25.40
Сколько живут собаки? Какова продолжительность жизни, выбранной нами породы?
Этими вопросами задаются все любители собак. К сожалению собаки живут не так долго, как нам бы того хотелось. Средняя продолжительность жизни собак зависит от породы. И здесь закономерно правило, что, чем больше собака по размеру, тем меньше ей отмерено лет жизни.
Вот данные о продолжительности жизни собак некоторых пород, которые подтверждают вышесказанное:
Стаффордширские терьеры живут около 13 лет;
Английские бульдоги - 8-10 лет;
Английских спаниели - 10-14 лет;
Аргентинские доги - 13-15 лет;
Бассеты - 9-11 лет;
Боксеры - 10-12 лет;
Болонки - 18-20 лет;
Большие пуделя - 15-17 лет;
Бордосские доги - 7-8 лет;
Западно-сибирские лайки - 10-14 лет;
Йоркширские терьеры живут 12-15 лет;
Кавказские овчарки живут - 9-11 лет;
Мопсы живут- 13-15 лет;
Немецкие доги живут - 7-8 лет;
Немецкие овчарки живут - 10-14 лет;
Ротвейлеры живут - 9-12 лет;
Таксы живут - 12–14 лет;
Той-терьеры - 12-13 лет;
Чихуа-хуа живут 15–17 лет;
Эрдельтерьеры - 10-13 лет.
1)джостик,2)графопостроитель,3)процесор,4)наушники,5)центральный процесор,6)акустические колонки,7)карта расширения,8)Delete,9)лазерный принтер.
Var r,h:integer;
v1,v2:real;
begin
writeln('Ввод радиуса: ');
readln(r);
writeln('Ввод высоты цилиндра: ');
readln(h);
v1:=2*pi*r*h;
v2:=4/3*pi*(r*r);
if v1>v2 then write('Объем цилиндра больше')
else write('Объем шара больше');
end.
А)(103 команды 1(вперед на 4)) б) (5 команд (назад 3))
