сервис вопросов и ответовПОМОГИТЕ С ЗАДАНИЕМ!!!
10-11 класс|
|
Дано четырехзначное число.Определить,верно ли ,что произведение первой и второй цифр равно произведению третьей и четвертой.
Программа:free pascal
Sergey9711
09 апр. 2015 г., 17:09:10 (9 лет назад)
Соня94
09 апр. 2015 г., 19:48:52 (9 лет назад)
program z1;
var a,a1,a2,a3,a4:integer;
begin
write('a=');readln(a);
a4:=a mod 10;
a:=a div 10;
a3:=a mod 10;
a:=a div 10;
a2:=a mod 10;
a1:=a div 10;
if a1*a2=a3*a4 then begin
writeln('Yes')
end
else begin
writeln('No')
end;
readln
end.
Ответить
Другие вопросы из категории
В университете города N принято, что старшая цифра трехзначного номера студенческой группы обозначает номер факультета, средняя - последнюю цифру
года поступления, младшая - порядковый номер группы. Программа по заданному номеру группы студента определяет, в каком году он поступил и на каком факультете учится. Номера факультетов следующие: 1 - исторический, 2 - экономический, 3 - юридический, 4 - математический, 5 - физический, 6 - химический, 7 - биологический, 8 - филологический, 9 - географический.
Из слова "форма" получить слово "фирма" 2) Дан текст "картографирования" получить слова ГРАФ, АРТ, РОФ. 3) Сколько раз в заданном условии повторяется буква
а.4) Дано предложение ( S) подсчитать количество символов (а).Помогите решить пожалуйста, очень срочно нужно. Прошу((((
Помогите!!!Срочно!!!
изначально растровое изображение имело палитру 65 536 цветов. В процессе его преобразования информационный объем уменьшился в 4 раза. Сколько цветов стало в палитре?
Читайте также
Помогите решить задание С2 из Егэ
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значение от -1000 до 1000.Гарантируется, что последний элемент массива отличен от нуля.
Приведите фрагмент программы вместо ... на языке Паскаль.
const N=30;
var
a: array [1..N] of integer;
i, x, y: integer;
s: real;
begin
for i;=1 to N do readln(a[i]);
.......
end.
ниже скрин задания.
помогите решить задание
ответ будет 9
мне решение надо, я разобраться не могу
Вы находитесь на странице вопроса "ПОМОГИТЕ С ЗАДАНИЕМ!!!", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.