)) 1. для создания сладкого буклета необходимо от 20 до 40 конфет . ввести количество купленных конфет и определить хватит ли создания. вывести ответ хватит или не хватит. 2. вывести корни квадратные из всех чисел от a до 50. а вводится с клавиатуры 5. вычислить функцию s=10x для sнач =1, для положительного значения х, х вводится с клавиатуры

DanchikSummer DanchikSummer    3   09.06.2019 02:10    0

Ответы
damila3434 damila3434  01.10.2020 22:41
Var
  a: longint;
begin
  readln(a);
  writeln(a >= 20 ? 'Хватит!' : 'Не хватит');
end.

var
  A: integer;
begin
  readln(a);
  for i: integer := a to 50 do
    writeln(i, ' => ', sqrt(i));
end.

var
  x: integer;
begin
  readln(x);
  writeln('s = ', 10 * x);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика