1

(11 відповідей, залишених у Pascal/Delphi)

вона не так працює,точніше працює з цілою сумою,а мені не так тре

2

(11 відповідей, залишених у Pascal/Delphi)

зробила,а тепер допоміжь з типами

3

(11 відповідей, залишених у Pascal/Delphi)

ось до 2 задачі
шось з типами ,чайник я)))

Прихований текст
program z1;
var suma, kil,Kil1,Kil2,Kil3,Kil4,Kil5,Kil6:integer;
begin
readln(suma);
Kil1 := suma div 50;
suma := Suma mod 50;
Kil2 := Suma div 25;
Suma := Suma mod 25;
Kil3 := Suma div 10;
Suma := Suma mod 10;
Kil4 := Suma div 5;
Suma := Suma mod 5;
Kil5 := Suma div 2;
Suma := Suma mod 2;
Kil6 := Suma div 1;
Suma := Suma mod 1;
kil:=kil1+kil2+kil3+kil4+kil5+kil6;
writeln(kil);
readln;
end.

1)написати програму ,яка виводить суму всіх цифр які містяться в заданому рядку
віхідні дані: ви вводите з клавіатури рядок  в якому є хоча б одна цифра

н-д,вхідні дані:fgghjf4hbnj7,вихідні: 11


2)є необмежена кількість монет 1,2,5,10,25,50 копійок.написати програму,яка визначатиме ,якою найменшою кількістю монет можна видати певну суму у гривнях,
н-д, вхідні дані:сума в гривнях2,72
вихідні:8


на мові програмування Pascal