Регистрация
Sabinaaa33
12.03.2023 06:58
Информатика
Есть ответ 👍

Запишіть призначення функції FloatToStr

1. Перетворює ціле число на рядок
2. Перетворює дійсне число на рядок
3. Перетворює рядок на ціле число
4. Перетворює рядок на дійсне число​

276
428
Посмотреть ответы 1

Ответы на вопрос:

ЕваКимСокДжин
ЕваКимСокДжин
4,6(96 оценок)

program fantscrin;

  const n = 8;

  var a: array [1..n] of integer;

      i,s: integer;

begin

  for i: =1 to n do

    a[i]: = random(11)+1;

  for i: =1 to n do

    write(a[i], '   ');

  p: =1;

  for i: =1 to n do

    if (i mod 2 < > 0) then p: =p*a[i];  

  writeln('');

  writeln('произведение = ',p);

end.

Популярно: Информатика