сервис вопросов и ответоввывести на экран номер всех счастливых билетов и подсчитать сколько их? В чем ошибка?
5-9 класс|
|
var a,b,c,d,f,e,n:longint; k:real;begink:=0;for n:=000001 to 999999 do begin a:= n mod 10;b:= n div 10 mod 10;c:= n div 100 mod 10;d:= n div 1000 mod 10;f:= n div 10000 mod 10;e:= n div 100000 mod 10;if(a+b+c=d+f+e) then begin writeln(n);k:=k+1;end;end;end.
покупатель должен заплатить в кассу S рублей . У него есть купюры в 1,2,5,10,50,100,500 руб. Найти наименьшее кол-во , которым он может рассчитаться? Помогите пожалуйста!
Maschuly
04 июля 2014 г., 8:49:51 (9 лет назад)
Камиллабогд
04 июля 2014 г., 10:57:47 (9 лет назад)
var
i1,i2,i3,i4,i5,i6:Longint;
begin
For i1:=0 to 9 do
For i2:=0 to 9 do
For i3:=0 to 9 do
For i4:=0 to 9 do
For i5:=0 to 9 do
For i6:=0 to 9 do
if i1+i2+i3=i4+i5+i6 then Writeln(i1,i2,i3,i4,i5,i6);
end.
HAYTAR007
04 июля 2014 г., 12:01:27 (9 лет назад)
у меня норм все работает
Ответить
Другие вопросы из категории
Выберите устройство ПК. которое по функциям можно сравнивать с мозгом человека:
А) видеокарта Б) звуковая карта
В) процессор Г) винчестер
Установите соответствие между датами в левой колонке и событиями в правой колонке.
1492 г. Создание самого первого компьютера
1961 г. Создание первого отечественного компьютера
1957 г. Открытие радиосвязи
1946 г. Первый полет человека в космос
1951 г. Принятие христианства на Руси
988 г. Первое упоминание в летописи о Москве
1895 г. Начало Великой Отечественной войны
1941 г. Запуск первого искусственного спутника Земли
1147 г. Открытие Колумбом Америки
Помогите пожалуйста решить эти задачи с составлением дано
1) Секретарь может набирать текст со скоростью 256 символов в минуту. Сколько Кбайт информации он сможет ввести в компьютер за 10 минут, если используется алфавит из 256 символов?
Читайте также
Задание1. Значение переменной Х ввести с клавиатуры. Переменной У присвоить значение 5. Вывести на экран информацию «знач.Х»+5=
«итог. сумма».
Задание 2.
Переменной Х присвоить значение 7. Переменной Р присвоить значение, равное квадрату Х. Вывести значения переменных Х и Р (через запятую). Значение Х увеличить на Х. Переменной Р присвоить значение, равное корню квадратному из Х. Вывести значения переменных Х и Р (через запятую).DIKTANT 2
Задание 1.
Значение переменной Х присвоить в программе. При неотрицательном значении Х переменной У присвоить значение, равное корню квадратному из Х. В противном случае, переменной У присвоить значение, равное квадрату Х. Вывести на экран значение Х и значение У.Задание 2.
Двум произвольным переменным присвоить произвольным образом соответственно 2 числа. Двум другим переменным присвоить значения, равные тангенсам двух предыдущих переменных. Вывести на экран значения всех переменных, а так же сумму значений двух последних переменных. помогите сделать пож
Дан массив из 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.одномерные массивы
Напишите программу на Паскале.ВЫвести на экран номера всех элементов массива B[1..n],не совподающих с максимальным
помогите
Вы находитесь на странице вопроса "вывести на экран номер всех счастливых билетов и подсчитать сколько их? В чем ошибка?", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.