сервис вопросов и ответоввывести на экран все двузхначные числа, в записи которых все цифры разные нужно все это в паскале сделать
5-9 класс|
|
Reva97
01 мая 2015 г., 17:05:44 (9 лет назад)
Otrini566
01 мая 2015 г., 17:48:01 (9 лет назад)
var a,b,c:integer;
begin
a:=10;
repeat
b:=a mod 10;
c:=(a div 10) mod 10;
if(b<>c) then writeln(a);
inc(a);
until(a>99);
readln;
end.
Ответить
Другие вопросы из категории
C начала 1990 года по некоторый день прошло n месяцев и 2 дня. Определить название месяца этого дня, написать программу в pascal (case of) и (if
else), подскажите хотя бы алгоритм решения!
Воспользовавшись моделью,определите,за сколько часов бассейн может быть наполнен через первую трубу,если через вторую он заполняеться за 24 часа,а
через первую и вторую вместе -за 8 часов.
Помогите распределить слова на две группы:общие понятия и единичные. Или объясните что озночают общие и единичные понятия.
вот слова:число,столица России,учебник,наука,житель Москвы,столица,самая высокая гора,А.С.Пушкин,сказочный персонаж,Змей Горыныч.
Читайте также
Срочно! Решение задачи должно выглядить на информационном языке турбо паскаля: Вывести на экран все четырехзначные числа, в записи которых нет
одинаковых цифр!
Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N.
Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.
Вводятся 4 числа. Вывести на экран максимальное
Вводятся три числа. Вывести на экран число с минимальной суммой цифр.
Помогите пожалуйста в Паскале
2. Определить, делится ли введенное число "а" на 3. Если делится то вывести на экран "Число делится на 3".Тип переменной определить самостоятельно. При
составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.
3. Дана программа на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until s>100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программу используя цикл While.
4. Вывести на экран массив целых чисел, Состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].
Задание1. Значение переменной Х ввести с клавиатуры. Переменной У присвоить значение 5. Вывести на экран информацию «знач.Х»+5=
«итог. сумма».
Задание 2.
Переменной Х присвоить значение 7. Переменной Р присвоить значение, равное квадрату Х. Вывести значения переменных Х и Р (через запятую). Значение Х увеличить на Х. Переменной Р присвоить значение, равное корню квадратному из Х. Вывести значения переменных Х и Р (через запятую).DIKTANT 2
Задание 1.
Значение переменной Х присвоить в программе. При неотрицательном значении Х переменной У присвоить значение, равное корню квадратному из Х. В противном случае, переменной У присвоить значение, равное квадрату Х. Вывести на экран значение Х и значение У.Задание 2.
Двум произвольным переменным присвоить произвольным образом соответственно 2 числа. Двум другим переменным присвоить значения, равные тангенсам двух предыдущих переменных. Вывести на экран значения всех переменных, а так же сумму значений двух последних переменных. помогите сделать пож
Вы находитесь на странице вопроса "вывести на экран все двузхначные числа, в записи которых все цифры разные нужно все это в паскале сделать", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.