1вопрос: определите к какому типу относится величина. площадь страны выберите один из 5 вариантов ответа: 1) лит 2) сим 3) лог 4) цел 5) вещ 2 вопрос: величина в информатике - это выберите несколько из 5 вариантов ответа: 1) символ 2) пример 3) строка 4) число 5) таблица 3 вопрос: какие из перечисленных величин относятся к постоянным? выберите несколько из 6 вариантов ответа: 1) температура тела человека. 2) количество месяцев в году. 3) среднегодовая температура воздуха в регионе 4) количество дней в неделе. 5) скорость автомобиля. 6) скорость часовой стрелки. 4 вопрос: укажите, какого типа переменные потребуются для обозначения в алгоритме указанных понятий. укажите соответствие для всех 4 вариантов ответа: 1) номер квартиры в доме 2) температура тела человека 3) количество забитых в матче шайб 4) порядковый номер ученика в классном журнале __ вещ __ цел __ цел __ цел 5 вопрос: что называется, операндом? выберите один из 3 вариантов ответа: 1) объекты, над которыми выполняются исследования. 2) объекты, над которыми выполняются операции. 3) объекты, с которых выполняются операции. 6 вопрос: какие из перечисленных величин относятся к переменным? выберите несколько из 4 вариантов ответа: 1) количество дней в месяце. 2) давление человека. 3) скорость грузовика. 4) год рождения человека. 7 вопрос: сопоставьте тип величины с её значением. укажите соответствие для всех 5 вариантов ответа: 1) лит 2) цел 3) вещ 4) лог 5) сим __ ю __ 1945 __ 12.34 __ 'алгоритм' __ false 9 вопрос: определите к какому типу относится величина. название города. выберите один из 5 вариантов ответа: 1) вещ 2) сим 3) лог 4) цел 5) лит 10 вопрос: какие из величин можно использовать в алгоритме? выберите несколько из 5 вариантов ответа: 1) логические 2) числовые 3) символьные 4) параметрические 5)
2. Немного изменим ваш код и получим искомое значение x
Искомое число х = 16293
var
x, y, a, b, k: integer;
begin
k:=10000;
repeat
x:=k;
a := 0; b := 0; y := 1;
while x > 0 do
begin
if (x mod 10) mod 2 = 0
then
a := a * 10 + x mod 10
else begin
y := y * 10;
b := b * 10 + x mod 10
end;
x := x div 10
end;
a := a * y + b;
k := k + 1;
until a = 26391;
writeln(a:8, k-1:8);
end.
55:5=11
365:11≈33(34) берём "34", чтобы перехлестнуть 365.
Так как 11-ый член является замыкающим (перехлёстывающим 365), тогда смотрим по ближайшим:
34*10=340 (340+34=374) - подходит, но это не максимум!
365 mod 10= 36, а это значит, что последующий член будет больше 365, а именно 395.
В задании сказано, что d должно быть максимальным, а "34" - это допустимое, но не максимально число, удовлетворяющее условию, даже минимальное (по результату).
Проверка:
34*11=374, значит, когда на экране выведется s:=340, n:=50, то, зайдя по следующему циклу, получится, что s:= 374, n:=55. На следующий цикл программа не пойдёт.
ответ: d=34.