Задать вопрос!

Задать вопрос!

Все категории

АННА5192 [4]

4 года назад

7

Чертёжник цвет :

= красный опустить перо вправо(3) вверх(3) влево (2) вниз(2) вправо(1) верх(1)

Информатика

1 ответ:

Jotem8 [50]4 года назад

0 0

Вот такая фигура получилась

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

Составить алгоритм и написать программу для задачи:заменить нулями элементы массива, которые меньше вводимого с клавиатуры числа

боров

Прога в приложении ============

0 0

1 год назад

Переведите целые числа из десятичной системы счисления в двоичную: а)89, б)600 ,в)2010. переведите целые числа из десятичной сис

olga alekseevna

1.
89=1011001
600=1001011000
2010=11111011010

2.
513=1000000001(в 2)=1001
600=1130
2010=3732

0 0

4 года назад

Сколько слов можно составить из слова марафон

joomlacoder [449]

Фон,раф,ран
больше я не знаю

0 0

1 год назад

Помогите пожалуйста!! Даны два четырехзначных числа. Определить, сумма цифр которого из них больше. Подсчет суммы цифр организов

Настя199

Пишу на Delphi (ObjectPascal):

function Summa(a,b:integer):string;
var a1,b1:integer;
begin //находим сумму первого числа
a1:=(a div 1000)+((a div 100)mod 10)+((a mod 100)div 10)+(a mod 10);
<span>
//находим сумму второго числа</span>
b1:=(b div 1000)+((b div 100)mod 10)+((b mod 100)div 10)+(b mod 10);
<span>
//выясняем что больше</span>
if a1>b1 then
Result:='Сумма цифр левого числа больше. Оно равно: '+IntToStr(a1)
else
Result:='Сумма цифр правого числа больше. Оно равно: '+IntToStr(b1);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin //Выполнение и вывод результата функции через нажатие кнопки
Label1.Caption:=Summa(StrToInt(Edit1.Text),StrToInt(Edit2.Text));
end;

0 0

4 года назад

Найди значение выражения X > У при а) x=2, y=2; б) x=2, y=-8

Хирин Денис Анато...

А)
X > Y ⇒ 2 > 2 ⇒ ложь (false)
б)
X > Y ⇒ 2 > -8 ⇒ истина (true)

0 0

4 года назад