Склавиатуры вводят строку 'город минск' в нижнем регистре. составьте программу, которая преобразовывает название города к верхнему регистру и выводит: 'город минск'.

  я тут немного отсебятины добавил, что бы программа не слетала если что-то нерпавильное вводиш))

 

 

vara: string; b: integer; beginwriteln ('введите строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; while (b = 1) dobeginwriteln ('введіте строку'); read (a); if (a='город минск')then writeln ('город минск')elsebeginwriteln ('введите "город минск", 1-продолжить, 0-выйти'); read (b); end; end;

end. 

Информационные технологии – неотъемлемая часть современного мира. без них невозможно обойтись во многих сферах деятельности, пришедших вместе с прогрессом, либо продвинувшимся далеко вперёд вместе с ним. развитие компьютерных технологий позволило обществу подойти к проблеме информатизации, связанной с быстро возрастающими интеграционными процессами, проникающими во все сферы нашей деятельности: науку, культуру, образование, производство, и т. д. информатизация общества - это социальный процесс, особенность которого состоит в том, что доминирующим видом деятельности в сфере общественного производства является сбор, накопление, обработка, хранение, передача, использование, продуцирование информации, осуществляемые на основе современных средств микропроцессорной и вычислительной техники, а также разнообразных средств информационного взаимодействия и обмена. информационные технологии, основанные на интернете, телекоммуникационных сетях и интеллектуальных компьютерных системах, открывают перед будущим поколением возможности свободного распространения знаний, различных сведений и материалов. ему придется столкнуться с необходимостью приспосабливаться к новой социальной среде, где информация и научное знание станут основными факторами, определяющими потенциал общества и перспективы его развития. использование единых мировых информационных систем обеспечивает внедрение информационных технологий в образование: формируется единое образовательное пространство, возрастает потребность человека в общении, и получении доступа к общим нематериальным ресурсам, осмыслении и переработке большого объема информации. смысл информатизации образования заключается в создании как для педагогов, так и для обучаемых благоприятных условий для свободного доступа к культурной, учебной и научной информации. необходимо также понимать, что информатизация сферы образования должна опережать информатизацию других направлений общественной деятельности, поскольку именно здесь закладываются социальные, психологические, общекультурные, а также профессиональные предпосылки развития общества нового типа.

Program treugolnik; uses crt; var a,h,s: real; begin clrscr;           write('основание a = ');           readln(a);           write('высота h = ');           readln(h);           writeln;           if (a< =0) or (h< =0) then           writeln('значения не могут быть отрицательными или равняться нулю')           else                     begin           s: =(1/2)*a*h;           writeln('площадь треугольника s = ',s);           end;           readln; end.