АВТОПРОБЕГ МОСКВА-ВЛАДИВОСТОК ПО МАРШРУТУ ДЛИНОЙ 9780 КМ ПРОДОЛЖАЛСЯ ДВЕНЕДЕЛИ. В ПЕРВУЮ НЕДЕЛЮ УЧАСТНИКИ ПРОБЕГА ПРЕОДОЛЕЛИ 4250 КМ. НА СКОЛЬКО КИЛОМЕТРОВ ОСТАВШИЙСЯ ПУТЬ ДЛИННЕЕ ПРОЙДЕННГО?

Написать программу в паскале, которая после введенного с клавиатуры числа(в диапазоне от 1 до 99), обозначающий денежную единицу, дописывал слово "Копейка". Например ,5 копеек,41 копейка и тд.

Вот мои попытки создать программу:

Program Kopeika;
Var a:integer;
begin
Writeln('Vvedite chislo');
Readln(a);
Case a of
'1,21,31,41,51,61,71,81,91': a:='Kopeika ';
'2..4,22..24,32..34,42..44,52..54,62..64,72..74,82..84,92..94': a:='Kopeiki ';
'5..20,25..30,35..40,45..50,55..60,65..70,75..80,85..90,95..99': a:=' Kopeek';
end;
Readln;
end.

II. Переведите на английский язык, обращая внимание на согласование времен.

1.        Я предполагала, что она знает английский очень хорошо.

2.        Я знала, что она танцует лучше, чем кто-либо еще.

3.        Мы слышали, что она получает новую квартиру.

4.        Мы были уверены, что ее картина станет шедевром.

5.        Я боялся, что он упадет и сломает ногу.

6.        Я знал, что мой друг никогда не был в Вашингтоне.

7.        Мы выяснили, что он совсем не знает немецкого языка.

8.        Он думал, что она не придет в школу.

9.        Я знал, что моя сестра изучает французский язык и думал, что она поедет в Париж.

10.    Я не знал, что ты уже вернулся в город.