Несколько заданий на паскале

[Алексей999]

Доброго времени суток на днях столкнулся с такой проблемой в школе поменяли учителя информатики и новый препод задает задачки прям так не для 10 класса если у кого есть возможность помочь с решением буду очень благодарен

[Вадим Мошев]

прям так не для 10 класса

Номер варианта определяется суммой последних 3-х цифр зачетки

Похоже, что вы говорите правду .

Могу помочь за денежное вознаграждение. Вы согласны?

[ZX Spectrum-128]

В конце мая поменяли учителя? А старый учитель поменял пол и ушел в декрет?
Ваши наработки есть?

[Poma][a]

У меня в свое время 3 раза за год меняли учителя.. И последняя замена произошла как раз в мае.. помнится, было очень весело решать 150 задач за неделю..


TC, а какие задачи из того списка Вас интересуют? Все решать как-то не ахти..

Номер варианта определяется суммой последних 2-х цифр зачетки.

А как получить 19 вариант?

[Trojan_de]

Если я правильно понимаю формулировку первой задачи, то она примерно так решается

var
str,s:string;
i:integer;
j:char;
a:array['0'..'9'] of boolean;
begin
str:='0123456789';
readln(s);
for i:=1 to length(s) do if pos(s[i],str)<>0 then a[s[i]]:=true;
for j:='0' to '9' do if a[j] then write(j,' ');
end.