Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Помогите решить ребус на паскале, пожалуйста: A+AB+ABC=BCB

10-11 класс

Blokhinsasha 19 апр. 2013 г., 14:08:01 (11 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Nysha031
19 апр. 2013 г., 16:25:36 (11 лет назад)

uses crt;
var a,b,c: integer;
begin
for a:=1 to 9 do
    for b:=1 to 9 do
        for c:=0 to 9 do
        if a+10*a+b+100*a+10*b+c=100*b+10*c+b
           then writeln(a,' ',b,' ', c);
end.

Ответить

Другие вопросы из категории

Паскаль!!!

составьте алгоритм для определения количества цифр в записи произвольного натурального числа

Помогите, пожалуйста. У меня два компьютера: один с программой The Bat 4.2.36.4 Pro

На втором установила The Bat 5.2 Final. Искала в интернете, как вернуть свой ящик в The Bat. Было сказано, создать новый под тем же именем, паролем, пользователем. Теперь у меня на двух компьютарах мой ящик. Но когда на любом из них пытаюсь получить новую почту, пишут что пароль неверный. Что делать?

Читайте также

Помогите решить задачу на Паскале.

Дана строка.Перенести последнюю букву слова в начало слова

Очень срооочно!!!Помогите решить подпрограмму в паскале,пожалуйста!!!!!!

Дано:массивы А1(N1,M1),A2(N2,M2),A3(N3,M3). Вычислить Х=Х1+Х2+Х3 и Y1+Y2+Y3, где Х1,Х2,Х3-количество нулей в каждом из массивов А1,А2,А3 соответственно, а Y1,Y2,Y3-количество элементов в каждом из этих массивов,лежащих в интервале [1,12]. Определение количества нулей в массиве и количества элементов, лежащих в этом интервале, оформить в виде подпрограммы.

Помогите решить задачу на паскале, очень нужно:

Дана строка, удалить текст находящийся в скобках (вместе со скобками)

Я тут начал делать, вот только с удалением у меня ничего не получается, напишите как можно сделать

Вот как я делал:
program zd;
uses crt;
var s:string; i,l,n,t,y:integer;
begin
clrscr;
writeln('Введите строку');
readln(s);
l:=length(s);
for i:=1 to n do begin
if s[i]='(' then
t:=i; {здесь присваивал номер найденной скобки}
if s[i]=')' then
y:=i; {так же, как и выше}
delete (s,t,i); {у меня получается, что он удаляет с открывающей скобки и всё что находится вправо, а левая часть до скобки остается нетронутой}
end;
writeln('Данный результат =', s);
readln;
end.



Вы находитесь на странице вопроса "Помогите решить ребус на паскале, пожалуйста: A+AB+ABC=BCB", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.