Goodstudents.ru

 

 

 

 

 

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


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

program english;
uses crt;
var a1,hh88,a2,a3,z,a4,a5,a37,a6,a7,a8,a9,a10,a11,a0,aa,a12,a13,a,a14:string;
begin
textbackground(1); clrscr; textcolor(13);
writeln('Мы отбыли в Японию в субботу, 5-го июня 1978.'); readln(a);
if a='We went to Japan on Saturday, the Fifth of June 1978.' then
writeln('Я открыл коробку, и Майкл взял сигару.')
else exit; readln(a5);
if a5='I opened the box, and Michael took out a cigar.' then
writeln('Я хотел бы стать врачом, но меня тошнит при виде крови. long')
else exit; readln(a6);
if a6='I had like to become a doctor, but I am sick at the sight of blood.' then
writeln('Никому не ясно, как это произошло.') else exit; readln(a7);
if a7='How this happened is not clear to anyone.' then
writeln('Вся беда в том, что я потерял его адресс.') else exit; readln(a8);
if a8='The trouble is that I have lost his address.' then
writeln('Рут не могла вспомнить, где она оставила фотоаппарат.')
else exit; readln(a9);
if a9='Ruth could not remember where she had left her camera.' then
writeln('Я не мог понять, что незнакомец пытается сказать.')
else exit; readln(a10);
if a10='I could not understand what the stranger was trying to say.' then
writeln('Где она оставила фотоаппарат, Рут не могла вспомнить.') else exit;
readln(a12);
if a12='Where she had left her camera, Ruth could not remember.' then
writeln('Что незнакомец пытается сказать, я не мог понять.') else exit; readln(a13);
if a13='What the stranger was trying to say, I could not understand.' then
writeln('Мы пошли к озеру, которое в этот момент было очень бурным.')
else exit; readln(z); if z='We went to the lake, which was very stormy that day.' then
writeln('      ') else exit;
writeln('GOOD SPIRITS TO WEAR!');
writeln('I AM PLEASED WITH YOUR ANSWER.');
readln;
end.





Похожие материалы



 






Goodstudents Goodstudents



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