Программа выполняется в паскале! Составьте программу для решения следующей задачи:Процентная ставка по вкладу – 15% годовых.
5-9 класс
|
Первоначальный вклад составил А рублей. Через сколько лет он станет больше В рублей? Значения А и В вводятся с клавиатуры. Помогите плииз.
var A,B:real;count:integer;
begin
readln(A,B);
while A<B do
beginA:=A+A/100*15;
count:=count+1;
end;
writeln(count);
end.
у меня нет такого((
только спасибо и звёздочки
ах ну да, ведь только я ответил( надо что бы несколько человек было
вот видишь, там над ответом значок "лучший"
Другие вопросы из категории
70966 в байтах,,,,,,,,,,?
70966 в кигабайтах...........?
70966 в мегабайтах.....?
равности и сообщает пилоту о необходимых действиях. Для решения этой задачи ему нужно выполнить 108 вычислительных операций. Быстродействие компьютера – 1 млн. операций в секунду. Успеет ли лётчик спасти самолёт, если минимальная высота, на которой самолёт можно вывести из пике – 2000 метров?
Читайте также
выведите на экран их сумму. Если все они нечетные и A>B>C, то определите и выведите значения наибольшего и наименьшего из чисел. Иначе, выведите числа без изменения. Фрагмент программы: if (a mod 2 = 0) and (b mod 2 = 0) and (c mod 2 = 0) then begin S:=a+b+c; writeln('сумма равна ', S); end; if (a mod 2 <> 0) and (b mod 2 <> 0) and (c mod 2 <> 0) and (a>b) and (b>c) then begin writeln('наибольшее число ', A); writeln('наименьшее число ', C); end else writeln('a= ',a,' b= ', b, ' c= ',c);
рождения 1 доллар. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему столько долларов, сколько лет исполнилось его племяннику. Определите, к какому дню рождения сумма превысит 100 долларов? Помогите плииз.
ляя значения скорости до целых чисел. Необходимо определить максимальную зарегистрированную скорость автомобиля. Если скорость хотя бы одного автомобиля была меньше 30 км\ч, выведите YES, иначе выведите NO.
Программа получает на вход число проехавших автомобилей N (1=<N=<30), затем указывает их скорости. Значение скорости не может быть меньше 1 и больше 300.
Программа должна сначала вывести максимальную скорость, затем YES или NO.
Написать на языке Паскаль
Пример работы программы: (смотри во вложениях)
2. Составьте программу заполнения массива A(20) датчиком случайных чисел в диапазоне от -50 до 49 включительно.
3*. Составьте программу заполнения массива, не используя клавиатуру, числами: 1, 3, 5, 7, 9, 11, 13, 15, 17, 19.
пунктирными линиями. Очень нужно, благодарю))