М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Надежда2709
Надежда2709
26.06.2021 18:25 •  Информатика

Найдите наименьшее значение входной переменной k, при котором программа выдаёт ответ 21. Для удобства мы показываем программу на пяти разных языках программирования.


Найдите наименьшее значение входной переменной k, при котором программа выдаёт ответ 21. Для удобств
Найдите наименьшее значение входной переменной k, при котором программа выдаёт ответ 21. Для удобств

👇
Ответ:
2006anna1
2006anna1
26.06.2021

Именно к дан­но­му k про­грам­ма выдаёт наи­мень­шее на­ту­раль­ное число x такое, что вы­пол­не­но не­ра­вен­ство х^3 > k × x^2. Решим не­ра­вен­ство: 21^3 > к × 21^2, при этом 20^3 <= 20^2. На­хо­дим k = 20.

ответ: 20.

p. s. "мы" - это кто? Жаль, что это копипаст..

4,8(63 оценок)
Открыть все ответы
Ответ:
BabaShyra
BabaShyra
26.06.2021

program z1;

uses graphABC;

begin

SetWindowSize(600,400);

SetWindowTitle('¨ëêà');

SetPenWidth(3);

SetPenColor(clBlack);

Line(250,100,300,50);

Line(300,50,350,100);

Line(350,100,250,100);

FloodFill(300,75,clGreen);

Line(235,200,300,100);

Line(300,100,365,200);

Line(365,200,235,200);

FloodFill(300,175,clGreen);

Line(200,300,300,200);

Line(300,200,400,300);

Line(400,300,200,300);

FloodFill(300,275,clGreen);

MoveTo(0,300);

LineTo(100,350);

LineTo(200,325);

LineTo(400,325);

LineTo(500,350);

LineTo(600,375);

FloodFill(15,375,clLime);

Rectangle(287,300,313,325);

FloodFill(300,315,clBrown);

SetBrushColor(clYellow);

Circle(500,100,50)

end.

Объяснение:

картинка


Составьте программу для рисования ёлочки в Pascal ABC ​
4,4(42 оценок)
Ответ:
HappyEnot
HappyEnot
26.06.2021
Program n;
var
a, b, i: integer;
begin
b:= 0;
for i:=1 to 4 do
  begin
  readln(a);
  if a > b then
  b:=a;
  end;
writeln('Наибольшее: ' + b);
end.

Как это работает?
Объявляются три целочисленные (interger) переменные:
a - вводимое число
b - самое большое число
i - счётчик цикла
После запуска программы переменной b присваивается значение 0 (чтобы было с чем сравнивать при первом значении)
Запускается цикл for с счётчиком i
Каждый раз цикл просит ввести пользователя число (а)
Дальше проверяется условие, если введённое число a больше числа, которое записано как самое большое (if a>b)
Если ведённое число больше, чем самое большое, то переменной b присваивается значение a
И так пока цикл не закончится
Затем выводится переменная b, в которой хранится самое большое из введённых чисел.
4,5(10 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ