М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
tanyaaksenova1
tanyaaksenova1
11.06.2021 17:13 •  Информатика

Дано 3 числа, расположить их в порядке возрастания(в паскале)

👇
Ответ:
lera5252
lera5252
11.06.2021

Надо от самого маленького числа начинать до самого большого! если ты не понимаешь в паскале обратись к другим сайтам

 

4,6(41 оценок)
Открыть все ответы
Ответ:
artemchik25
artemchik25
11.06.2021

Логика игры

Есть игро­вое поле — про­стой пря­мо­уголь­ник с твёр­ды­ми гра­ни­ца­ми. Когда шарик каса­ет­ся стен­ки или потол­ка, он отска­ки­ва­ет в дру­гую сто­ро­ну. Если он упа­дёт на пол — вы про­иг­ра­ли. Что­бы это­го не слу­чи­лось, вни­зу вдоль пола лета­ет плат­фор­ма, а вы ей управ­ля­е­те с щью стре­лок. Ваша зада­ча — под­став­лять плат­фор­му под шарик как мож­но доль­ше. За каж­дое удач­ное спа­се­ние шари­ка вы полу­ча­е­те одно очко.

Алгоритм

Что­бы реа­ли­зо­вать такую логи­ку игры, нуж­но преду­смот­реть такие сце­на­рии пове­де­ния:

игра начи­на­ет­ся;

шарик начи­на­ет дви­гать­ся;

если нажа­ты стрел­ки вле­во или впра­во — дви­га­ем плат­фор­му;

если шарик кос­нул­ся сте­нок, потол­ка или плат­фор­мы — дела­ем отскок;

если шарик кос­нул­ся плат­фор­мы — уве­ли­чи­ва­ем счёт на еди­ни­цу;

если шарик упал на пол — выво­дим сооб­ще­ние и закан­чи­ва­ем игру.

Хит­рость в том, что всё это про­ис­хо­дит парал­лель­но и неза­ви­си­мо друг от дру­га. То есть пока шарик лета­ет, мы вполне можем дви­гать плат­фор­му, а можем и оста­вить её на месте. И когда шарик отска­ки­ва­ет от стен, это тоже не меша­ет дру­гим объ­ек­там дви­гать­ся и вза­и­мо­дей­ство­вать меж­ду собой.

4,5(89 оценок)
Ответ:
slavaglybochka
slavaglybochka
11.06.2021
1.
var p:real; i:integer;
begin
write('цена 1 кг конфет = ');
readln(p);
for i:=1 to 10 do writeln(i,' кг - ',i*p:5:2);
end.

Пример:
цена 1 кг конфет = 125.50
1 кг - 125.50
2 кг - 251.00
3 кг - 376.50
4 кг - 502.00
5 кг - 627.50
6 кг - 753.00
7 кг - 878.50
8 кг - 1004.00
9 кг - 1129.50
10 кг - 1255.00

2.
var a,b,p,i:integer;
begin
write('a, b: ');
readln(a,b);
p:=1;
for i:=a to b do p:=p*i;
writeln('p = ',p);
end.

Пример:
a, b: 5 10
p = 151200

3.
var n,i:integer; s:real;
begin
write('n = ');
readln(n);
s:=0;
for i:=1 to n do s:=s+1/i;
writeln('s = ',s:8:3);
end.

Пример:
n =5
s = 2.283
4,4(48 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ