?аза?стан, Атырау
СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ
Благодаря готовым учебным материалам для работы в классе и дистанционно
Скидки до 50 % на комплекты
только до
Готовые ключевые этапы урока всегда будут у вас под рукой
Организационный момент
Проверка знаний
Объяснение материала
Закрепление изученного
Итоги урока
Была в сети 19.11.2023 20:26
Санатова Гульбаршын Утеулиевна
Информатика математика п?ні м??алімі
62 года
340
109 796 
Местоположение
Паскаль программалау тілі
D есебі: Екі б?тін сан A ж?не B беріледі. A-дан B-?а дейінгі ж?п сандарды? ?осындысын табы?ыз.
program D;
var i,a,b,s:integer;
f,g:text;
begin
assign(f, 'd_in.pas'); reset(f); read(f,a,b);
assign(g, 'd_out.pas'); rewrite(g);
for i:=a to b do
begin if (i mod 2)=0 then s:=s+i; end;
writeln(g,'s=',s);
close(f); close(g); read(a,b); s:=0;
end.
Категория:
Информатика
09.02.2015 23:32
Вебинар для учителей
Свидетельство об участии БЕСПЛАТНО!
Полезное для учителя
Реализация образовательных программ осуществляется с применением исключительно электронного обучения и ДОТ
