Есть ответ 👍

20 в паскале определить кол-во целых чисел а , в , с

226
487
Посмотреть ответы 2

Ответы на вопрос:


uses crt;

var a,b,c: real;

    k: integer;

begin

writeln('введите a,b,c: ');

read(a,b,c);

k: =0;

if frac(a)=0 then k: =k+1;

if frac(b)=0 then k: =k+1;

if frac(c)=0 then k: =k+1;

write('количество целых=',k);

end.

lenawer
4,7(15 оценок)

1 МБ

Объяснение:

(1024*512*2)/1048576=1

Популярно: Информатика