М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Выгуки
Выгуки
30.04.2022 23:46 •  Информатика

Дуже требааа до ть інформатиики інст@levujak
Завдання. Створити проект для визначення кількості та с
даного числа
ионня кількості та суми ци
Вхідні дані
Вихідні дані
а 12456
k5; S = 18
as 965
3; S = 20
1. Визначте вхідні та вихідні дані, проміжні змінні.
Вхідні: а- дане число.
Вихідні: S, k - сума та кількість цифр числа.
Проміжні змінні: С поточна остання цифра числа.
2 Уведіть код для виконання обчислень при натисканні на форму.
Dim k, s, a, c As Integer
"Ведення даного числа
a InputBox("а")
ke
S е е
While a <>
"Відокремлення останньої цифри числа
са Mod 10
"Визначення кількості цифр
kе k + 1
“Визначення суми цифр
S = 5 + с
Відкидання останньої цифри числа
as a \ 10
End while
Рgor("S" в S)
Новок ("k" 6 k)
3. Запустіть проект та перевірте правильність його роботи.
4 ренжіть проект під назвою Вправа_50 Прізвище:
ВПРАВА 60

👇
Открыть все ответы
Ответ:
Shark238
Shark238
30.04.2022

К середине 3-го тыс. до н. э. клинопись, использовавшаяся теперь как минимум для шумерского и аккадского языков, развилась в более-менее стабильную словесно-слоговую систему, включавшую около 600 знаков, для которых была характерна как полифония, так и омофония. В последующие века все 600 знаков никогда не использовались одновременно в одном месте, и в каком-то смысле дальнейшая история клинописи — это история выборок форм знаков и их значений, в зависимости от времени, места и жанра, с добавлением некоторых значений и неиспользованием многих других, упрощением отдельных знаков и формированием характерных местных пошибов.

4,8(41 оценок)
Ответ:
dendiololosh
dendiololosh
30.04.2022

var

  x: real;  

  cost: real;  //Стоимость капитала

  i: integer;

 

begin

  cost:= 20;  //Начальная стоимость равна 20 

  writeln('Введите ежегодный прирост в процентах');

  readln(x);  //Вводим ежегодный прирост в процентах

  for i:= 1626 to 2012 do   {Каждый год стоимость капитала увеличивается на стоимость капитала * х / 100}

    cost:= cost + cost * (x / 100);

  writeln('Стоимость капитала составляла бы в этом году:  ', cost : 0 : 5, ' $');  {Выводим стоимость капитала с округлением до 5 знаков после запятой}

end. 

Отметь решение как лучшее)

 

4,5(73 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ