С/С++ 1. Описать структуру типа «государство». Учесть название, часть мира, столицу, язык. Вывести количество государств описанных в структуре, которые находятся в Европе;
2. Создайте текстовый файл file.txt, и запишите в него 30 случайных чисел. Выведите наибольшее и наименьшее число с данного файла. Напишите соответствующие программы.

(см. объяснение)

Объяснение:

Напишем программу на Python 3:

k = 0

for i in input():

   if (ord(i) in range(65, 91)) or (ord(i) in range(97, 123)):

       k += 1

print(k)

Задание выполнено!

Комментарий 1:

Замечу, что то же самое легко сделать на паскале:

##

var k: integer := 0;

foreach var c: char in ReadString do

 if((ord(c) in [65..90]) or (ord(c) in [97..122]))

   then k:= k+1;

print(k);

Комментарий 2:

Задачу можно было решить несколько иначе:

k = 0

for i in input():

   if ('a' <= i <= 'z') or ('A' <= i <= 'Z'):

       k += 1

print(k)

Комментарий 3:

Решение из комментария 2 тоже несложно написать на паскале:

##

var k: integer := 0;

foreach var c: char in ReadString do

 if((c in ['a'..'z']) or (c in ['A'..'Z']))

   then k:= k+1;

print(k);

Var
begin
readln(n);
if n=1 then begin writeln('1 месяц');writeln('кол-во дней');end;
if n=2 then begin writeln('2 месяц');writeln('кол-во дней');end;
if n=3 then begin writeln('3 месяц');writeln('кол-во дней');end;
if n=4 then begin writeln('4 месяц');writeln('кол-во дней');end;
if n=5 then begin writeln('5 месяц');writeln('кол-во дней');end;
if n=6 then begin writeln('6 месяц');writeln('кол-во дней');end;
if n=7 then begin writeln('7 месяц');writeln('кол-во дней');end;
if n=8 then begin writeln('8 месяц');writeln('кол-во дней');end;
И так до 12 раз...
Я не уверен что тебе нужен такой монстр...
В место к примеру 1 месяца пишешь январь...