Int x,i;
cout<<"->";
cin>>x;
for (i=0;i<=7;i++)
if (x[i]%7==0) cout<<x[i]<<endl;
else cout<<"Нету"<<endl;
Не думаю что это точно,так как на моём компе нет Borland c++
и я немогу проверить.
"Тебе придётся ещё заголовок подыскать для русского текста в консоли"
Компьютеры могут выполнять рутинную работу, то есть однотипные вычисления, которые заняли бы у человека гораздо больше времени
<u>Задание 1.</u>
var
A, B, C, F: boolean;
i, j, k: integer;
begin
for i := 0 to 1 do
for j := 0 to 1 do
for k := 0 to 1 do
begin
A := (i = 1); B := (j = 1); C := (k = 1);
F := ((A and B) and C) = (A and (B and C));
Writeln('A=', A, ', B=', B, ', C=', C, ', результат сравнения:', F)
end
end.
<u>Результат выполнения программы:</u>
A=False, B=False, C=False, результат сравнения:True
A=False, B=False, C=True, результат сравнения:True
A=False, B=True, C=False, результат сравнения:True
A=False, B=True, C=True, результат сравнения:True
A=True, B=False, C=False, результат сравнения:True
A=True, B=False, C=True, результат сравнения:True
A=True, B=True, C=False, результат сравнения:True
A=True, B=True, C=True, результат сравнения:True
<u>Задание 2.</u>
var
a, b, c: integer;
begin
for a := 1 to 9 do
for b := 0 to 9 do
for c := 0 to 9 do
if sqr(10 * a + b) - sqr(c) = 100 * a + 10 * b + c then Writeln(a, b, c)
end.
<u>Результат выполнения программы:</u>
100
147
Не понятно, в каком редакторе, но один из вариантов
а) Левая мышка и тянуть, будет выделен голубым цветом.
б) Ctrl-C - Скопировать в буфер.
в) В нужном месте(отметить мышкой) Ctrl-V - туда скопируется из буфера.
г) Левой мышкой отметить, Del.
Повторюсь, это один из вариантов. Для разных редакторов по-разному, но, в основном, так. в Word ищи в меню вверху, там русскими буквами твои действия написаны, поэтому просто отмечаешь, выбираешь в меню нужное действие, ... и всё!
Вообще ооооочень странный вопрос(задача), абсолютно неконкретный, типа, пойди туда, не знаю, куда, принеси то, не знаю, что....
Успехов!
