Информатика
Информатика, 14.10.2019 08:30, Damirzic

Вопрос/Задача:

Построить программу в pascal. "даны четыре целых числа. определить сколько из них четных." надо завтра сдать, !

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

Ответ
Ответ разместил: Гость

1)

т.к swf ,htm, flx это не формат видео графики

Ответ
Ответ разместил: Гость

дано: 5 бит на 1 шарик

найти: кол.шариков

5 бит-это 32 варианта номера(где ед. объема информации бит, там надо подставлять это число в степень двойки, например: 3 бита- 2³=8(кол.вариантов)

5 бит- 2⁵=32    8 бит- 2⁸=

ответ: 32 шарика.

Ответ
Ответ разместил: Гость

program max_chislo;

var

  a,b,c: integer;

begin

  write ('введите три числа через пробел'); read(a,b,c); readln;

  if (a> b) and (a> c) then write('максимальное число = ',a);    

  if (b> a) and (b> c) then write('максимальное число = ',b)

      else write ('максимальное число = ',c);

  readln;

end.

Ответ
Ответ разместил: богдан254

var i,r,a: integer;

begin cls; r: =0; for i: =1 to 4 dobeginread(a); if a mod 2 = 0 then inc(r); end;

writeln('chetnyh = ',r); readln; end.

Похожие вопросы

Вопросы по предметам

Вопросов на сайте: