Наведені нижче дві “неправильні” рівності стануть правильними, якщо числа першої розглядати як трійкові, а другої – як шістнадцяткові: 11 + 12 = 100 20 - 8 = 18 для кожного з поданих нижче арифметичних виразів треба знайти мінімальну основу системи числення n (2≤n≤20), в якій цей вираз стане рівністю. 1) а3 - 69 = 3а 2) 72 + 87 = 139 3) 101 * 11 = 1111 4) 3 * 22 = 132 5) 105 * 4 = 424 6) 333 - 134 = 144 7) 35 + 53 = 121 результат: сім чисел, записаних послідовно через пробіл, що основу системи числення n для кожної зі семи рівностей, наприклад: 9 8 7 6 5 4 3 основи мають бути вказані за порядком запису рівностей.
uses crt;
var
ar: array[1..19]of integer;
i, mul, sum, count, min, mini: integer;
begin
count := 0;
sum := 0;
mul := 1;
randomize;
for i := 1 to 19 do
begin
ar[i] := random(13) - 6;
mul := mul * ar[i];
if(ar[i] mod 2 = 0) then
begin
textbackground(green);
sum := sum + ar[i];
count := count + 1;
end;
if(ar[i] = 5) then
textbackground(red);
write(ar[i], ' ');
textbackground(black);
end;
writeln();
writeln('Произведение всех элементов массива = ', mul);
writeln('Сумма четных чисел = ', sum, ', количество = ', count);
min := ar[1];
mini := 1;
write('Номера элементов, равных 5: ');
for i := 1 to 19 do
begin
if(ar[i] = 5) then
write(i, ' ');
if((ar[i]) < min) then
begin
min := ar[i];
mini := i;
end;
end;
writeln();
writeln('Минимальный элемент = ', min, ', его номер = ', mini);
end.
1. Якщо від мене хочуть через модуль Turtle намалювати трикутник, то ось:
import=turtle
t=turtle.Pen ()
t.forward (70)
t.right (90)
t.forward (30)
t.right (90)
t.forward (70)
t.right (90)
t.forward (30)
Також, якщо потрібно усе стерти, але залишити черепашку на тому ж місці, застосуй команду: t.clear
2. Ось твій код:
a=int (input ("Скільки сантиметрів пляма на штанцях?") )
if a <2:
print ('Приймуть')
else:
a>2
print ('На жаль, не приймуть')
Ми застосовуємо тут змінну a, а також стрічку для того, щоб користувач ввів свої данні.
!Слідкуй за пробілами, коли ти пишеш if: , клацай enter, якщо працюєш в IDLE!