var
a: array [1..4] of char;
s: string;
i: byte := 1;
begin
readln(s);
while (i < length(s)) do
begin
if ((not(s[i] in ['ж', 'ч', 'ш', 'щ'])) or (pos(s[i], s) > i)) then
delete(s, i, 1)
else
i += 1;
end;
writeln(s);
end.
Суть в том, чтобы удалить все нешипящие буквы, а также повторы шипящих, после чего просто вывести строку
1. С:\учёба\математика\ГИА\Расписание
2. С:\учёба\Расписание
3. D:\2013\Зима\Январь\Вьюга.doc
<span>4. D:\2013\Весна\Май\Ландыш.doc
Остальные задания повторяются.</span>
#include <iostream> // header input/output streams
#include <fstream> // header для работы с файлами
using std::ifstream; // для работы с файлом input.txt
using std::ofstream; // для работы с файлом output.txt
using std::cin; // для работы cin
using std::cout; // для работы cout
using std::endl; // для работы перевода на новую строку endl
int main(){
ifstream in_file;
ofstream out_file;
try{
in_file.open("input.txt");
out_file.open("output.txt");
}
catch(std::exception& e){
cout << e.what() << endl;
}
unsigned int a,b;
in_file >> a >> b;
unsigned int sum = a+b -1;
cout << sum;
out_file << sum - a << ' ' << sum-b << endl;
}
Для того, чтобы сравнить две величины, поставим их в один ряд, переведем байты в Мбайты, либо Мбайты в байты, как вам удобнее
1 Мбайт = <span>1048576 Байт
140192 байта - 0,13 Мбайт
Соответственно 1 Мбайт > </span>140192 байта
3+1=4-1=100(милибайтов)-27=73(милибайтов)
ответ:73 милибайта