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

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

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

Кирила Петрович [14]

4 года назад

6

Плес, помогите, решить в Паскале надо!

Плес, помогите, решить в Паскале надо!

Информатика

1 ответ:

Ирина Кузьмич4 года назад

0 0

Программа на PascalABC.NET но в стиле TurboPascal.
Скриншот результата и листинг в приложениях.

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

Составить программу проверки знания таблицы умножения. Сценарий: компьютер спрашивает: «Проверим?» (варианты ответов: 0 – «нет»,

kosa1

// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018

var c, w: integer;

procedure check;

begin

var (a, b) := (Random(0, 20), Random(0, 20));

Print($'{a}*{b}=');

if a * b = ReadInteger then begin inc(c); Println('Правильно') end

else begin inc(w); Println('Неправильно') end;

end;

procedure res;

begin

Println($'Задано вопросов {c+w}');

Println($'Правильных {c}({(c*100)/(c+w):f1}%)');

Println($'Неправильных {w}({(w*100)/(c+w):f1}%)');

end;

begin

var start := true;

while start do

begin

Println('Проверим?(0/1)');

if ReadInteger = 0 then

begin start := false; res; end

else check;

end;

end.

Пример в приложении.

0 0

4 года назад

Прочитать ещё 2 ответа

Какие теги и атрибуты необходимо прописать в теге < form > < / form >, чтобы средствами языка html создать форму с к

katod [67]

Атрибуты method, action и <input type='submit'>.
А конкретнее method='POST' action='post.php' и <input type='submit'> внутри формы

0 0

4 года назад

Сделай из волка козу

джулька [15.1K]

<span>волк полк пола поза коза,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,</span>

0 0

4 года назад

Проверить свойство аддитивности энтропии на примере источника [х [x1 x2 x3 x4 p ]= 1/2 1/4 1/8 1/8 ]

olga-olga3018 [14]

Рад помочь но не знаю

0 0

4 года назад

Что такое условие? (в информатике)

Rostt [397]

Условие при котором подходят варианты решения

0 0

3 года назад