переделать код программы с языка паскаль на с++. вот код паскаль: var f: array[1..500] of record fam: string; bal: boolean; end; buf: boolean; str: string; b1,b2,i,n,j: integer; c: char; begin readln(n); for i: =1 to n do begin repeat begin read(c); f[i].fam: =f[i].fam+c; end; until c=' '; repeat begin read(c); f[i].fam: =f[i].fam+c; end; until c=' '; f[i].bal: =false; read(b1,b2); if (b1< 30)or(b2< 30) then f[i].bal: =true; end; for i : = 1 to n-1 do begin for j : = i + 1 to n do if f[i].fam > f[j].fam then begin str: = f[i].fam; f[i].fam: = f[j].fam; f[j].fam: = str; buf: = f[i].bal; f[i].bal: = f[j].bal; f[j].bal: = buf; end; end; for i: =1 to n do if f[i].bal=true then writeln (f[i].fam); end.

Объяснение:

рлллолшчллы пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук тра3 я не знаю почему у тебя так же когда ты один ты постоянно пишешь звонишь хотя бы тоже поела и все больше ничего я не знаю почему у тебя р от меня надо было с 33333месяцев Тогда и 44беседовать

#include "stdafx.h"

#include <stdio.h>//i/o

#include <conio.h> //_getch()

#include <ctype.h> //toupper

int main()

{

   long i,n;

   float cost, p,buf;

   do

   {

       printf("Vvedite pervonachalnuy stoimost : ");scanf_s("%f",&cost);

       printf("Vvedite procent p %  : ");scanf_s("%f",&p);

       printf("Vvedite n chisl Let : ");scanf_s("%u",&n);

       for(i = 0; i < n; i++)

       {

           printf("Let %u\r\n",i + 1);

           buf = cost*p/100;

           printf("Stoimost za zimmu + : %f\r\n",(cost += buf));

           buf = cost*p/100;

           printf("Stoimost za zimmu -: %f\r\n",(cost -= buf));

       }

       printf("Stoimost %u Let %f\r\n",i,cost);

       printf("Najmite Y - new input\r\n");

   }

   while(toupper(_getch()) == 'Y');

   return 0;

}