S=740*60*80=3552000 символов
1. Если в кодировке 1 символ = 1 байт
V=3552000 байт ≈ 3,39 МБ
2. Если в кодировке UNICODE, то 1 символ = 2 байта
V=3552000*2 байт=7104000 байт ≈ 6,77 МБ
Program privet1;
var
k : integer;
begin
write('Введите номер курса: ');
readln(k);
if k = 1 then
writeln('Привет, первокурсник')
else if k = 2 then
writeln('Привет, второкурсник')
else if k = 3 then
writeln('Привет, третьекурсник')
else if k = 4 then
writeln('Привет, четверокурсник')
else if k = 5 then
writeln('Привет, пятикурсник');
end.
Для обычного пользователя, программа может в любой момент перестать работать, запрося ключ активации.
Если на предприятии используется не лицензионное ПО, могут возникнуть проблемы с законом, которые могут повлечь за собой крупные денежные штрафы.
<em>// PascalABC.NET 3.3, сборка 1555 от 21.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString.Reverse.Println
end.
<u>Пример</u>
рука
акур