alarm
Задайте вопрос
Информатика
Simeon

Переведите с Pascal на PYTHON, максимум поинтов Program Example_180; Uses crt; Var m,n,k:word; {n – початкова кількість скринь з золотом, m – щорічний “прибуток” Чахлика Невмирущого, k – “потреби” Василини Премудрої} Sum,Years:word; {Sum – щорічне накопичення Чахлика Невмирущого, Years – вік Василини Премудрої} Begin Clrscr; Write(‘Введіть початкову кількість скринь з золотом: ’); Readln(n); Write(‘Введіть щорічний прибуток Чахлика: ’); Readln(m); Write(‘Введіть “потреби” Василини Премудрої: ’); Readln(k); Sum:=n; {Початковий “капітал” Чахлика} Years:=18; {Початковий вік Василини} While Sum<=k do Begin Sum:=Sum+m; Years:=Years+1; End; Writeln(‘Василині вже виповнилося ’,Years,’ років. ‘); Readkey; {Затримка зображення на екрані} End. ​

ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Чтобы ответить необходимо зарегистрироваться.

Другие вопросы: - Информатика

Вказівка виконавцеві виконати пе

Разгадайте ребус?Разгадайте ребу

44БАЛЛА❤️ посчитайте информа

Эксель. Поиск решения. 50 поинто

В чем разница между 2D-графикой

Составьте в среде программирован

Контакты
Реклама на сайте