СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Подготовка к контрольной работе по программированию

Категория: Информатика

Нажмите, чтобы узнать подробности

Пять примеров программ на языке Pascal для повторения перед к/р.

Просмотр содержимого документа
«Подготовка к контрольной работе по программированию»

var a, b, z: real;

begin

a:=27.2;

b:=148;

z:=sqrt(a+b)/(a*a-b);

writeln (z:2:2)

end.



var x,y: real;

begin

read (x);

if x=0 then y:=sqrt(25+2*x) else y:=x*x+25;

writeln (y:2:2)

end.



var l,r: real;

const p=3.14;

begin

read (r);

if r=0 then

begin

l:=2*p*r;

writeln (l:2:2)

end

else

writeln ('решения нет')

end.



var i,p: integer;

begin

p:=1;

for i:=2 to 6 do

p:=p*i;

writeln (p)

end.





var s,a: integer;

begin

s:=0;

repeat

read(a);

s:=s+a;

until s=100;

writeln (s);

end.