Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 03.10.2016 03:18
- Информатика
- remove_red_eye 19831
- thumb_up 10
Ответы и объяснения 1
var input,a,b,c:integer;
begin
readln(input);
if(input >= 100) and (input <= 999) then
begin
writeln('Число трехзначное.');
if (input mod 2 0) then
writeln('Число нечетное.');
end;
readln(a,b,c);
if(a > b ) and (a > c) then
a := b + c;
if(b > a ) and (b > c) then
b := c + a;
if(a < c ) and (b < c) then
c := a + b;
writeln('a = ', a);
writeln('b = ', b);
writeln('c = ', c);
end.
- 04.10.2016 11:26
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.