2. var
r: integer;
result: string;
begin
write('вводите число от 1 до 12: ');
readln(r);
case r of
1: Result := 'январь';
2: Result := 'февраль';
3: Result := 'март';
4: Result := 'апрель';
5: Result := 'май';
6: Result := 'июнь';
7: Result := 'июль';
8: Result := 'август';
9: Result := 'сентябрь';
10: Result := 'октябрь';
11: Result := 'ноябрь ';
12: Result := 'декабрь';
end;
writeln(' месяц : ',result);
end.
Объяснение:
я написал ответ только к 2 задаче
постарайся сам сделать 1 ую задачку.
Для отправки и получения писем используются определенные протоколы:
Simple Mail Transfer Protocol, SMTP.
Отправляет письмо почтовому серверу.
Post Office Protocol 3, POP3.
Принимает письмо от почтового сервера и передает получателю.
Internet Message Access Protocol, IMAP.
Как и POP3, извлекает письмо из почтового сервера, но этот протокол более современный и удобный. Основное отличие в том, что IMAP работает с почтой непосредственно на сервере, а POP3 скачивает входящие письма с сервера и сохраняет их локально.
