Type ye=1850..2100;
var year, year1:ye;
name:string;
a:integer;
begin
writeln('Какой сейчас год?');
readln(year);
writeln('Твое имя?');
readln(name);
writeln('В каком году ты родился(родилась)?');
readln(year1);
a:=year-year1;
writeln('Твое имя ', name);
writeln('Ты прожил ', a, ' Лет(года)');
writeln('Ты прожил приблизительно ', a*365, ' дней');
writeln('Ты прожил приблизительно ', a*364*24, ' часов');
end.
Мынау кандай сабак?
Кай сынып?
Картины. Рисунки. Фотографии.
Сижу и рисую картину.
Просматриваю старые фотографии.
Смотрю детске рисунки.
Ну. некоторые из них ложные.ТАМ ГДЕ НАПИСАНО РЯДОМ Л ЭТО ЛОЖ А ТАМ ГДЕ И ЭТО ИСТИНА
В прямом коде:
В обратном коде:
В дополнительном коде коде: