Goodstudents.ru

 

 

 

 

 

Контрольные по английскому (сочинения, ответы, деловая корреспонденция) Исходник на паскале теста по английскому языку по теме "тире"
Исходник на паскале теста по английскому языку по теме "тире"


Исходник на паскале теста по английскому языку по теме "тире"

program english;
uses crt;
var a1,a2,a3,a4,a5,a37,a6,a7,a8,a9,a10,a11,a0,aa,a12,a13,a,a14:string;
hh1,hh2,z,cc2,cc3,q1:string;
begin
textbackground(1); clrscr; textcolor(13);
writeln('подкова лошади'); readln(a);
if a='a horse|s shoe' then
writeln('подковы лошади')
else exit; readln(a5);
if a5='horses| shoes' then
writeln('часовая прогулка')
else exit; readln(a6);
if a6='an hour|s work' then
writeln('трехлетнее отсутствие') else exit; readln(a7);
if a7='three years| absence' then
writeln('минутное сомнение') else exit; readln(a8);
if a8='a moment|s hesitation' then
writeln('Я собираюсь пойти в булочную (в мясной магазин, к моей тете, к Смитам, к бабушке и дедушке, к Смиту и Брауну).')
else exit; readln(a9);
if a9='I am going to the baker|s (the butcher|s, my aunt|s, the Smiths|, my grandparents|, Smith and Brown|s).' then
writeln('Мы купили новую посуду: чашки, блюдца, тарелки, миски.')
else exit; readln(a10);
if a10='We bought some new crockery -- cups, saucers, plates, dishes.' then
writeln('Мне нужно кое-что из одежды -- пара рубашек, брюки и туфли.') else exit;
readln(a12);
if a12='I need some new clothes -- a couple of shirts, a pair of trousers, and shoes.' then
writeln('Фотоаппараты, бинокли, драгоценности, духи -- всевозможные дорогие товары были спрятаны в машине контрабандиста.')
else exit; readln(a13);
if a13='Cameras, binoculars, jewellery, perfume -- all sorts of expensive goods were hidden in the smuggler|s car.'
then writeln('Сьюзен оставила везде включенным свет -- еще один пример ее рассеянности.')
else exit; readln(z); if z='Susan had left all the lights on -- another example of her carelessness.' then
writeln('Мой дядя Джо -- он самый прекрасный пловец -- подарил школе кубок по плаванию.') else exit;
readln(cc2); if cc2='My uncle Joe -- he was himself an exellent swimmer -- gave a cup for swimming to the school.' then
writeln('Роджер Тойнби сидел совершенно прямо в своем кресле -- мертвый.') else exit;
readln(cc3); if cc3='Roger Toynbee was sitting up-right in his leather chair -- dead.' then
writeln('блюдца') else exit; readln(q1); if q1='saucers' then
writeln('      ') else exit;
writeln('GOOD SPIRITS TO WEAR!');
writeln('I AM PLEASED WITH YOUR ANSWER.');
readln;
end.






 






Рейтинг@Mail.ru

Goodstudents Goodstudents



Все права на материалы сайта принадлежат авторам. Копирование (полное или частичное) любых материалов сайта возможно только при указании ссылки на источник (администратор сайта).