{Дано двузначное число. Определить: а) является ли сумма его цифр двузначным числом; б) больше ли числа а сумма его цифр} var n, s : byte; a:integer; begin writeln('введите двузначное число'); readln(n); {определение суммы цифр числа div - целая часть от деления, mod - остаток от деления} s:=n div 10 + n mod 10; writeln('сумма цмфр числ', n:5, 'равна',s:5); if s>9 then writeln('сумма цифр двузначное число', s) else writeln('сумма цифр не двузначное число', s);
writeln('введите число а'); readln(a); if s>a then writeln('сумма цифр', n,' больше ли числа ', a) else writeln('сумма цифр', n,' меньше числа ', a);
фон- основной цвет
ЭКОНОМИЧНОСТЬ — одна из основных составляющих успеха хозяйственной деятельности, суть которой заключается в разумной и рациональной экономии
ЭРГОНОМИКА-Научно-практическая дисциплина, изучающая трудовые процессы с целью создания оптимальных условий труда росту его производительности.
Программи́ст — специалист, занимающийся программированием, то есть созданием компьютерных программ.
Пользователь — лицо или организация, которое использует действующую систему для выполнения конкретной функции.
цвет-окраска
программа-Изложение содержания и цели деятельности политической партии, организации или отдельного деятеля.
дизайн-Художественное конструирование предметов быта, интерьеров, промышленных изделий и т. п.
проект-Разработанный план сооружения, устройства чего-н.
меню-Подбор кушаний, а также листок с перечнем их.
качество-Наличие существенных признаков, свойств, особенностей, отличающих один предмет или явление от других.
диалог-литературная или театральная форма устного или письменного обмена высказываниями между двумя и более людьми
интерфейс-граница между двумя функциональными объектами, требования к которой определяются стандартом;
звук-Воспринимаемое слухом физическое явление, порождаемое колебательными движениями частиц воздуха или другой среды.
Определить:
а) является ли сумма его цифр двузначным числом;
б) больше ли числа а сумма его цифр}
var n, s : byte;
a:integer;
begin
writeln('введите двузначное число');
readln(n);
{определение суммы цифр числа div - целая часть от деления, mod - остаток от деления}
s:=n div 10 + n mod 10;
writeln('сумма цмфр числ', n:5, 'равна',s:5);
if s>9 then writeln('сумма цифр двузначное число', s)
else writeln('сумма цифр не двузначное число', s);
writeln('введите число а');
readln(a);
if s>a then writeln('сумма цифр', n,' больше ли числа ', a)
else writeln('сумма цифр', n,' меньше числа ', a);
end.