Перевести с Паскаля на Си (массив записей/структур)

[Максим28]

Структура элемента массива работник: фамилия, число, месяц и год рождения, пол.
определить:
─ фамилия самого старшего мужчины;
─ все фамилии, начинающиеся с заданной буквы;
─ список людей, родившихся в заданном месяце.
uses crt;
type
info = record
FIO: string;
d: 1..31;
m: 1..12;
y: 1990..1996;
p: string[1];
end;
var
i,n,m: integer;
st,max: info;
a:array [1..50] of info;//не integer
c: char;
begin
clrscr;
window(1,1,80,25);
textcolor(6);
textbackground(8);
clrscr;
write('Введите количество записей: ');
readln(n);
for i:=1 to n do
begin
clrscr;
writeln('*** Запись №',i,' ***');
write('Введите ФИО: ');
readln(st.FIO);
write('Введите день рождения: ');
readln(st.d);
write('Введите месяц рождения: ');
readln(st.m);//не d
write('Введите год рождения: ');
readln(st.y);
write('Введите пол: ');
readln(st.p);
a[i]:=st;
end;
clrscr;
max:=a[1];
For i:=2 to n do
if (a[i].p='m') and ((a[i].d<max.d) and (a[i].m<=max.m) and (a[i].y<=max.y))then
max:=a[i];
writeln('Самый старший мужчина: ',max.FIO);
write('Введите букву: ');
readln(c);
for i:=1 to n do
if a[i].fio[1]=c then
writeln(a[i].FIO);
write('Введите месяц: ');
readln(m);
for i:=1 to n do
if a[i].m=m then
writeln(a[i].FIO);
readln;
end.

[challengerr]

Примерно так

#include <stdio.h>
#include <stdlib.h>
#include <locale.h>
#include <string>
#include <iostream>
using namespace std;

struct info
{
string FIO;
int d;
int m;
int y;
char p;
};

int main()
{
int i, n, m;
char c;
struct info *a;
struct info *max;


setlocale(LC_ALL, "Russian");
cout << "Введите количество записей\n";
cin >> n;

a = new info[n];

for(i=0;i<n;i++)
{
cout << "Запись №" << i << "\n";
cout << "\nВведите ФИО: "; cin >> a[i].FIO;
cout << "\nВведите день рождения: ";  cin >> a[i].d;
cout << "\nВведите месяц рождения: "; cin >> a[i].m;
cout << "\nВведите год рождения: "; cin >> a[i].y;
cout << "\nВведите пол: "; cin >> a[i].p;
cout << "\n";
}

max = &(a[0]);

for(i=1;i<n;i++)
if (a[i].p == 'm' && a[i].d < max->d && a[i].m <= max->m && a[i].y <=max->y )
max = &(a[i]);

cout << "Самый старший мужчина \n"; 
cout << "ФИО: " << max->FIO << "\n";
cout << "день рождения: " << max->d << "\n";
cout << "месяц рождения: " << max->m << "\n";
cout << "год рождения: " << max->y << "\n";
cout << "пол: " << max->p << "\n";

cout << "Введите букву\n";
cin >> c;

for(i=0;i<n; i++)
if (a[i].FIO[0] == c)
cout << a[i].FIO << "\n";

cout << "Введите месяц\n";
cin >> m;

for(i=0;i< n;i++)
if (a[i].m == m)
cout << a[i].FIO << "\n";

delete []a;

return 0;
}