Задания делаются в языке Paskal ABC/
Заранее за Задача 1. Дан файл, содержащий ненулевые целые числа. Создать новый файл,
содержащий только положительные числа исходного файла (в том же порядке).
Задача 2. Дан файл вещественных чисел. Поменять в нем местами минимальный и
максимальный элементы.

Program egor_sasha; var num_eg, num_sash,pri,pri1: real; var mes_eg,mes_sash: real; beginwriteln('numer egora'); readln(num_eg); writeln('numer sashi'); readln(num_sash); writeln('mesto egora (verkh=1,vniz=0)'); readln(mes_eg); writeln('mesto sashi (verkh=1,vniz=0)'); readln(mes_sash); pri: =num_sash+1; pri1: =num_eg+1; if num_eg=pri then    writeln('yes')  else writeln('no'); if num_sash=pri1 then    writeln('yes')  else writeln('no'); if mes_eg=1 then    writeln('egor-high')else  writeln('egor-low'); if mes_sash=1 then    writeln('sasha-high')else  writeln('sasha-low'); end.

#include <iostream>

#include <string>

#define N 5

using namespace std;

int count_flat = 0;

struct Flat {

int n_rooms;

int square;

int floor;

string address;

double price;

void PrintInfo() {

 cout << "\nКоличество комнат: " << n_rooms << "\nПлощадь " << square << "\nЭтаж:" << floor << "\nАдрес " << address << "\nЦена: " << price;

}

void InputInfo() {

 cout << "Количество комнат: ";

 cin >> n_rooms;

 cout << "Площадь: ";

 cin >> square;

 cout << "Этаж: ";

 cin >> floor;

 cout << "Адрес: ";

 getline(cin, address);

 cout << "Цена: ";

 cin >> price;

}

void PrintChecksInfo(int number) {

 

 if (number >= price) {

  count_flat++;

  PrintInfo();

 }

}

};

signed main() {

setlocale(LC_ALL, "Rus");

int choice;

Flat mas[N];

for (int i = 0; i < N; i++)

 mas[i].InputInfo();

cout << "Введите стоимость: ";

cin >> choice;

for (int i = 0; i < N; i++) {

 mas[i].PrintChecksInfo(choice);

}

if (count_flat <= 0)

 cout << "Таких квартир нет!";

return 0;

}