shangina1997507

10.05.2023

написать код в PascalABC! Очень нужно.

Информатика

Ответить

Ответы

Viktorovna

10.05.2023

Объяснение:

const h = 24;

c = 5;

var s,k:integer;

begin

write('Введите сумму, которую Вы готовы потратить: ');

read(s);

k := (s div h) + (s div h div c);

write('Количество шоколадок: ',k);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

написать код в PascalABC! Очень нужно.

▲

написать код в PascalABC! Очень нужно.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Составьте таблицу истинности: (а+в)х(а+с)

Что такое персональный компьютер 3-8 предложений

Число 9, 081 к нормализованному виду в 10сс:

Создать ориентированный или неориентированный граф по карте любого города любой страны в виде рисунка paint или в виде презентации в powerpoint

Надо про каждую строчку рассказать, что это и что значит. program fury; const n=10; var a: array[1..n]of integer; min, max, i, s: integer; begin for i: =1 to n do read(a[i]); min: =1; max: =1; for i:...

Дан двумерный массив. Найти минимальную сумму элементов строки и номер этой строки

Алгоритм вычисления функции F(n) задан следующими соотношениями F(n)=3 при n=1 F(n)=2*F(n-1)-n+1, если n>1 чему равно значение ф-ии F(21)-?

сделать две программы в Питоне. 1 Создайте список из случайных чисел. Найдите второй максимум.2). (a = [1, 2, 3] # Первый максимум == 3, второй == 2 )

Найти сумму квадратов неотрицательных двузначных чисел с разными цифрами.

Лабораторная работа № 1. Знакомство с HTML Ознакомиться с работой следующих тегов и параметров: html, head, title, body (bgcolor, background, text, link), p (align), b, em, u, i, font, ol...

написать код в PascalABC! Очень нужно.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Составьте таблицу истинности: (а+в)х(а+с)

Что такое персональный компьютер 3-8 предложений

Число 9, 081 к нормализованному виду в 10сс:

Создать ориентированный или неориентированный граф по карте любого города любой страны в виде рисунка paint или в виде презентации в powerpoint

Надо про каждую строчку рассказать, что это и что значит. program fury; const n=10; var a: array[1..n]of integer; min, max, i, s: integer; begin for i: =1 to n do read(a[i]); min: =1; max: =1; for i:...

Дан двумерный массив. Найти минимальную сумму элементов строки и номер этой строки​

Алгоритм вычисления функции F(n) задан следующими соотношениями F(n)=3 при n=1 F(n)=2*F(n-1)-n+1, если n&gt;1 чему равно значение ф-ии F(21)-?

сделать две программы в Питоне. 1 Создайте список из случайных чисел. Найдите второй максимум.2). (a = [1, 2, 3] # Первый максимум == 3, второй == 2 )

Найти сумму квадратов неотрицательных двузначных чисел с разными цифрами.

Лабораторная работа № 1. Знакомство с HTML Ознакомиться с работой следующих тегов и параметров: html, head, title, body (bgcolor, background, text, link), p (align), b, em, u, i, font, ol...

Дан двумерный массив. Найти минимальную сумму элементов строки и номер этой строки

Алгоритм вычисления функции F(n) задан следующими соотношениями F(n)=3 при n=1 F(n)=2*F(n-1)-n+1, если n>1 чему равно значение ф-ии F(21)-?