Goodstudents.ru

 

 

 

 

 

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



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

program english;
uses crt;
var a1,a2,a3,a4,a5,a37,a6,a7,a8,a9,a10,a11,a0,aa,a12,a13,a,a14:string;
z,cc,cc1:string;
begin
textbackground(3); clrscr; textcolor(1);
writeln('Я потерял новую ручку, которую подарила мне тетя.'); readln(a);
if a='I have lost my new pen, which was a present from my aunt.' then
writeln('В Париже, который так привлекателен весной, летом слишком жарко.')
else exit; readln(a5);
if a5='Paris, which is so attractive in spring, is too hot in summer.' then
writeln('Он не видел писем, которые лежали на столе.')
else exit; readln(a6);
if a6='He did not see the letters which were lying on the table.' then
writeln('Ручка, которую я потерял, была подарком на день рождения.') else exit; readln(a7);
if a7='The pen I lost was a birthday present.' then readln(cc);
if cc='The pen which I lost was a birthday present.' then
writeln('В тот день, когда я окончу школу, мне исполнится семнадцать лет.') else exit; readln(a8);
if a8='The day when I finish school will be my seventeenth birthday.' then
writeln('Если я его увижу, я скажу ему об этом.')
else exit; readln(a9);
if a9='If I see him, I shall tell him about it.' then
writeln('После того как закончатся уроки, мы пойдем домой.')
else exit; readln(a10);
if a10='After the lessons are over, we shall go home.' then
writeln('Я скажу ему об этом, если я его увижу.') else exit;
readln(a12);
if a12='I shall tell him about it if I see him.' then
writeln('Мы пойдем домой, после того как закончатся уроки.') else exit; readln(a13);
if a13='We shall go home after the lessons are over.' then
writeln('Мой отец сказал, что я могу идти гулять.')
else exit; readln(z); if z='My father said that I could go out.' then
writeln('Учитель сказал нам, что занятия окончены.') else exit; readln(cc1);
if cc1='The teacher told us that the lessons were over.' then
writeln('      ') else exit;
writeln('GOOD SPIRITS TO WEAR!');
writeln('I AM PLEASED WITH YOUR ANSWER.');
readln;
end.






 






Рейтинг@Mail.ru

Goodstudents Goodstudents



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