Информатика

Аватар
Информатика, опубликовано 2018-08-22 22:41:36
На счёт паскалей абс program test_1; var a,b,c,d,e:integer; begin writeln (Какова масса куска янтаря, хранящегося в Паланге, если при изменении температуры от 5 до 18 °С его энергия увеличилась на 93,6 кДж?); writeln(1)9300 г 3)1000); writeln(2)3600 г 4)2600); read(a); if a=2 then writeln(Правильно!) else writeln(Неправильно); writeln (Какова температура воды в самом горячем озере на Камчатке, если для приготовления ванны объемом 200 л температурой 40 °С в нее влили 40 л воды при 10 °С?); writeln(1)25 с 3)10 с); writeln(2)55 с 4)50 с); read(b); if b=4 then writeln(Правильно!!) else writeln(Неправильно); writeln (Какую емкость имел новый тульский самовар-рекордсмен, если при КПД 50 % он закипал за 20 мин и потреблял ежеминутно 460 г древесного угля, удельная теплота сгорания которого 35 МДж/кг? Начальная температура воды 15 °С.); writeln(1)450 л 3)500 л); writeln(2)540 л 4)400 л); read(c); if c=1 then writeln(Правильно!!) else writeln(Неправильно); writeln (Самый экономичный тепловой двигатель 1840 г. потреблял 0,77 кг угля при мощности 735 Вт. Каков КПД установки? Удельная теплота сгорания угля 29 Мдж/кг.); writeln(1)13% 3)12%); writeln(2)14% 4)16%); read(d); if d=3 then writeln(Правильно!!) else writeln(Неправильно); writeln (В 1965 г. в Кисловодске выпал град, который покрыл почву слоем толщиной 75 см. На сколько изменилась внутренняя энергия каждого квадратного метра при его таянии? Насыпная плотность вещества 800 кг/м3.); writeln(1)175 МДж 3)190 МДж); writeln(2)180 МДж 4)198 МДж); read(e); if e=4 then writeln(Правильно!!) else writeln(Неправильно); end. всё тут правильно,но незнаю ,что сделать что б оценку ставил( Скажите?
Аватар
Информатика, опубликовано 2018-08-22 22:41:28
Аватар
Информатика, опубликовано 2018-08-22 22:41:12