Рэш 7 класс контрольная работа В1
Урок 16

Ответы

var a: integer;

begin

writeln ('vvedite nomer mesuaca');

read (a);

if (a=1) then writeln ('30');

if (a=2) then writeln ('28');

if (a=3) then writeln ('30');  

  if (a=4) then writeln ('31');  

  if (a=5) then writeln ('30');  

  if (a=6) then writeln ('31');  

  if (a=7) then writeln ('30');  

  if (a=8) then writeln ('31');  

  if (a=9) then writeln ('30');  

  if (a=10) then writeln ('31');  

  if (a=11) then writeln ('30');  

  if (a=12) then writeln ('31');  

end. 

 

program bapehbe;

var

    l, b, s : integer;

    o : real;

begin

    writeln (' skolko litrov varenya v tazy? ');

    readln (l);

    writeln (' kakaya emkost banok? ');

    readln (b);

    s: = l div b;

    o: = l mod b;

    writeln (' polnih banok_', s);

    writeln (' litrov ostaloc_', o: 2: 2);

    readln;

end. 

системный блок

 

Найдено 2 ответ(ов)
Показать ответы


Знаешь ответ?

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

A. решение на калькуляторе 1. находим общее количество пикселей n = 1024×768 = 786432 2. находим количество бит, необходимое для отображения цвета одного пикселя k=㏒₂64 = 6 (или п...Подробнее
ответов: 3
моя неделя проходит загружено. половину дня я провожу в школе, потом , репетиторы, выйти на улицу, покататься на санках, поваляться в снегу времени практически а мы что-то гово...Подробнее
ответов: 3
Популярные вопросы