У=124+8×<5
у=5-124>8×
у=-119>8×
1) ответы 1; 0;1;0
2)для 2 верно
3) для 1 верно
Ключевые слова программирования Паскаль ,что они обозначают:and,end,nil,set,array,file,not,then,begin ,for, of, to, case, wrile,
Катя123451
And<span> (энд) - И
</span>end<span> (энд) - конец
</span>nil<span> (нил) - нуль
</span>set <span>(сет) - множество
</span>array<span> (эрей) - массив
</span>file<span> (файл) - файл
</span>not<span> (нот) - не
</span>then<span> (зен) - то
</span>begin<span> (бегин) - начало
</span>for<span> (фo) - для
</span>of<span> (оф) - из
</span>to<span> (ту) - увеличивая до
</span>case<span> (кейс) - вариант
</span>while (вайл) - пока
downto (даунту)- уменьшая до
record<span> (рикод) - запись
</span>with<span> (вис) - с
</span>function<span> (фанкшн)- функция
</span>or<span> (ор) - или
</span>type<span> (тайп) - тип
</span>const<span> (конст) - константа
</span>go to<span> (гоу ту)- переход на
</span>packed<span> (пэкт) - упаковать
</span>until<span> (антил) - до
</span>div<span> (див) - разделить
</span>if <span>(иф) - если
</span>procedure()<span> - процедура
</span>var<span> (вар) - переменная
</span>do<span> (ду) - выполнить
</span>in<span> (ин) - в
</span>program<span> (програм) - программа
</span>else<span> (элс) - иначе
</span>mod<span> (мод) - модуль
</span>repeat<span> (рипит) - повторять</span>
//Я слабо себе представляю как выглядит блок-схема с подпрограммой, так что выкладываю два варианта
//Pascal ABC.NET v3.1 сборка 1219
Var s:real; i,j,d1,d2,r1,r2,k:integer;
function Simple(d,r:integer):real;
begin
Simple:=sqr(d)*(r-1130)*9.8/(18*0.6);
end;
begin
k:=0;
read(d1,d2,r1,r2);
for i:=d1 to d2 do
begin
for j:=r1 to r2 do
begin
s:=s+Simple(i,j);
inc(k);
end;
end;
s:=s/k;
writeln(s);
end.
Пример ввода:
1
5
2
4
Пример вывода:
-11249.1296296296