Даны три вещественных числа. Вывести ** экран те из них, которые кратны 5.

Question

Даны три вещественных числа. Вывести на экран те из них, которые кратны 5.

Comments

А язык, я извиняюсь, какой?

---

паскаль

Answer 1

Var a,b,c: real;
begin
readln (a);
readln (b);
readln (c);
if (a mod 5)=0 then
writeln (a);
if (b mod 5)=0 then
writeln (b);
if (c mod 5)=0 then
writeln (c);
end.

Comments

А кто вас так учил работать с вещественными числами?