Составить программу на языке pascal для решения следующей : дана строка. заменить в этой строке все буквы «о» на буквы «а». если букв «о» не встречено в строке, то вывести на экран сообщение «нет буквы «о»

program prim;

var i,x : integer;

begin

x: =1;

for i: =1 to 5 do

begin write (x,'   ');

x: =x+2;

end;

end. 

информатика - наука о способах получения, накопления, хранения, преобразования, передачи, защиты и использования информации.

информация - сведения о чем-либо, независимо от формы их представления.

информационные технологии -  широкий класс дисциплин и областей деятельности, относящихся к технологиям создания, и обработки данных, в том числе с применением вычислительной техники

находим занимаемый объм в битах

640*640*2,5*4

делим на 1024 и находим его в килобитах

4000 кб

12000/4000=3 (3 бита цветности)

не ясно что нужно, кб-килобиты или килобайты

program strangle;

var

a: integer;

begin

readln(a);

if a = 180 then writeln('yes') else writeln('no');

end;