Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
ANDRESSA LIMA NEPOMUCENO 600624624
program AndressaNepomuceno; uses crt; var vf, tj, am, prest:real; n:integer; begin vf:= 15475; tj:= vf*00.158; am:= vf/8; n:=1; while(n<=8) do begin tj := vf*1.0158; prest := am + tj; vf := vf - am; writeln (am:10, ' ' , tj:10 , ' ' , prest:10 , ' ' , vf:10); n := n+1; end; writeln('Parcelas'); end.
run
|
edit
|
history
|
help
0
Сумма пар чисел кратных и некратных 11 с дельтой
zadan 4
zadanye 4
exRecords
Урок 2 задача не из учебника
test27
practica 3 ejercicio B4
пример рекурсивной функции
Pascal Epsilon
Сумма пар чисел кратных и некратных 11