|
Паскаль, помогите с задачей.
|
|
lis_s  | Дата: Воскресенье, 28.04.2013, 15:21 | Сообщение # 1 |
Сообщений: 98
| Всем привет, кодхаксчани-форумчани,нужна помощь.
Буду благодарен, помощь не за просто так, аккаунт (бф3, мох10, симс3) отдам (за правильное решение).
Дали задачу:
Вы положили деньги в банк на срочный депозит на три месяца из расчёта 60% годовых. Напишите программу, которая вычислит причитающуюся вам через три месяца сумму.
Сообщение отредактировал lis_s - Воскресенье, 28.04.2013, 15:22 |
| |
| |
| Mariq | Дата: Воскресенье, 28.04.2013, 16:06 | Сообщение # 2 |
Сообщений: 88
| var x:real;
begin
readln(x);
X:=x*0.15+x;
write(x);
end.
Нет?
|
| |
| |
| sk1ttlz | Дата: Воскресенье, 28.04.2013, 16:28 | Сообщение # 3 |
Титул:  Сообщений: 1200
| var
sum:real;
begin
writeln('Type deposit sum:');
readln(x);
x:=x+0.15*x;
writeln('Your sum = ',x);
end.
Mariq, прости, не видел твой пост.
Сообщение отредактировал sk1ttlz - Воскресенье, 28.04.2013, 16:30 |
| |
| |
Danonka  | Дата: Воскресенье, 28.04.2013, 16:45 | Сообщение # 4 |
Сообщений: 415
| Скитлз, где у тебя указан x?
Пудж в топе, нави в компендиуме, можно ливать
|
| |
| |
| man248 | Дата: Воскресенье, 28.04.2013, 16:59 | Сообщение # 5 |
Сообщений: 463
| Цитата (Danonka) readln(x); не? Я прост уже все забыл
Запуск бф3 без Origin(способ от Man248)
|
| |
| |
| Danonka | Дата: Воскресенье, 28.04.2013, 17:08 | Сообщение # 6 |
Сообщений: 415
| Ну, вроде как его надо в варах указывать
Но могу и ошибатьсяДобавлено (28.04.2013, 17:08)
---------------------------------------------
program 123123;
var x:real;
begin
readln(x);
X:=x*0.15+x;
writeln(x);
readln;
end.
Изменил, протестил. Принимай работу
Пудж в топе, нави в компендиуме, можно ливать
|
| |
| |
Equak  | Дата: Воскресенье, 28.04.2013, 19:18 | Сообщение # 7 |
Сообщений: 22
| Если чо, програм не может начинаться с цифор 
Код Uses crt;
Var vklad:integer;
Begin
Writeln('Извольте-с ввести ваш первоначальный вклад, добрая душенька моя');
Read(vklad);
Writeln('Ну-с, ваш вклад после 3-х месяцев составляет=',vklad+vklad*0.15,'рублев');
End.
Сообщение отредактировал Equak - Воскресенье, 28.04.2013, 19:19 |
| |
| |
| Danonka | Дата: Воскресенье, 28.04.2013, 19:23 | Сообщение # 8 |
Сообщений: 415
| Окай
И это сказал мне человек, который пишет рублев..
Это не паскаль. Ну или очень мудреный.
Пудж в топе, нави в компендиуме, можно ливать
|
| |
| |
| Equak | Дата: Воскресенье, 28.04.2013, 19:25 | Сообщение # 9 |
Сообщений: 22
| та шучу я)0
ето паскаль абиси
|
| |
| |
| Danonka | Дата: Воскресенье, 28.04.2013, 19:46 | Сообщение # 10 |
Сообщений: 415
| Тут не нужен абиси
Тут нужен обычный фришный. Ну как я думаю.
Пудж в топе, нави в компендиуме, можно ливать
|
| |
| |
