Вопрос по информатике:
1)Дано двузначное число. Определить:одинаковы ли его числа.
2) Мастями игральных карт условно присвоены след. порядковые номера:"пики"-1., "трефы"-2, "бубны"-3, "черви"-4. По заданному номеру масти m(1<ли равно m &l
- 24.08.2018 00:37
- Информатика
- remove_red_eye 2159
- thumb_up 81
Ответы и объяснения 1
2)
Program Masty
Uses Crt;
var n:integer;
begin
clrscr;
write('введи номер масти 1-4 :');
readln(n);
case n of
1:writeln ('Пики');
2:writeln ('Трефы');
3:writeln ('Бубны');
4:writeln ('Червы');
else writeln('Неправильный номер масти');
end;
readkey;
end.
1)
Program Cifry;
Uses Crt;
var n:integer;
s:string[2];
begin
clrscr;
write('введи двузначное целое число :');
readln(n);
str(abs(n),s);
if (s[1]=s[2]) then writeln('Цифры числа одинаковые')
else writeln('Цифры числа не одинаковые');
readkey;
end.
- 25.08.2018 08:00
- thumb_up 29
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.