Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.


Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему Решение задач по теме Программирование линейных алгоритмов

Содержание

Задача №1Написать программу нахождения суммы двух чисел. Числа вводятся с клавиатуры.
Задача №1Задача №2Задача №3Задача №4Задача №5Задача №6Задача №7Задача №8Задача №9Задача №10Ответ к Задача №1Написать программу нахождения суммы двух чисел. Числа вводятся с клавиатуры. Решение задачи №1program summa;uses CRT;var a,b,s: integer;beginclrscr;write('a=');read(a);write('b=');read(b);s:=a+b;writeln('s=',s)end. Задача №2Найти периметр треугольника. Длины сторон вводятся с клавиатуры Решение задачи №2program perimetr;uses CRT;var a,b,c,P: integer;beginclrscr;write('a=');read(a);write('b=');read(b);write('c=');read(c);P:=a+b+c;writeln('P=',P)end. Задача №3Написать программу нахождения периметра и площади прямоугольника. Стороны прямоугольника вводятся с клавиатуры. Решение задачи №3program pryam;uses CRT;var a,b,S,P: integer;beginclrscr;write('a=');read(a);write('b=');read(b);P:=(a+b)*2;S:=a*b;writeln('P=',P);writeln('S=',S)end. Задача №4Написать программу нахождения периметра и площади. Сторона квадрата вводится с клавиатуры. Решение задачи №4program kvadrat;uses CRT;var a,S,P: integer;beginclrscr;write('a=');read(a);P:=4*a;S:=sqr(a);writeln('P=',P);writeln('S=',S)end. Задача №5Написать программу нахождения площади прямоугольного треугольника. Длины катетов вводятся с клавиатуры. Решение задачи №5program treug;uses CRT;var a,b,S,P: real;beginclrscr;write('a=');read(a);write('b=');read(b);S:=0.5*a*b;writeln('S=',S:2:2)end. Задача №6Написать программу нахождения значения выражения Решение задачи №6program prog;uses CRT;var a,x,y: real;beginclrscr;write('a=');read(a);write('x=');read(x);y:=(sqr(x)-sqrt(x*a))/abs(a);writeln('y=',y:2:2)end. Задача №7Написать программу нахождения площади треугольника со сторонами по формуле Герона. Решение задачи №7program treug;uses CRT;var a,b,c,p,s: real;beginclrscr;read(a,b,c);p:=0.5*(a+b+c);s:=sqrt(p*(p-a)*(p-b)*(p-c));writeln('s=',s:2:2)end. Задача №8Написать программу нахождения суммы цифр двухзначного числа. Число водится с клавиатуры. Решение задачи №8program summa;uses CRT;var X,a,b,S: integer;beginclrscr;write('x=');read(x);a:=x div 10;b:=x mod 10;S:=a+b;write('S=',S)end. Задача №9Написать программу нахождения суммы цифр двухзначного числа. Число водится с клавиатуры. Решение задачи №9program summa;uses CRT;var x,s: integer;beginclrscr;read(x);s:=(x mod 10)+(x div 100)+(x mod 10 mod 10);write('s=',s)end. Задача №10С клавиатуры вводятся скорости двух автомобилей. Какое расстояние будет между ними Решение задачи №10program avto;uses CRT;var v1,v2,s1,s2,s: integer;beginclrscr;read(v1,v2);s1:=3*v1;s2:=3*v2;s:=abs(s1-s2);write('s=',s)end.
Слайды презентации

Слайд 2 Задача №1


Написать программу нахождения суммы двух чисел. Числа

Задача №1Написать программу нахождения суммы двух чисел. Числа вводятся с клавиатуры.

вводятся с клавиатуры.


Слайд 3 Решение задачи №1
program summa;
uses CRT;
var a,b,s: integer;
begin
clrscr;
write('a=');
read(a);
write('b=');
read(b);
s:=a+b;
writeln('s=',s)
end.

Решение задачи №1program summa;uses CRT;var a,b,s: integer;beginclrscr;write('a=');read(a);write('b=');read(b);s:=a+b;writeln('s=',s)end.

Слайд 4 Задача №2


Найти периметр треугольника. Длины сторон вводятся с

Задача №2Найти периметр треугольника. Длины сторон вводятся с клавиатуры

клавиатуры


Слайд 5 Решение задачи №2
program perimetr;
uses CRT;
var a,b,c,P: integer;
begin
clrscr;
write('a=');
read(a);
write('b=');
read(b);
write('c=');
read(c);
P:=a+b+c;
writeln('P=',P)
end.


Решение задачи №2program perimetr;uses CRT;var a,b,c,P: integer;beginclrscr;write('a=');read(a);write('b=');read(b);write('c=');read(c);P:=a+b+c;writeln('P=',P)end.

Слайд 6 Задача №3


Написать программу нахождения периметра и площади прямоугольника.

Задача №3Написать программу нахождения периметра и площади прямоугольника. Стороны прямоугольника вводятся с клавиатуры.

Стороны прямоугольника вводятся с клавиатуры.


Слайд 7 Решение задачи №3
program pryam;
uses CRT;
var a,b,S,P: integer;
begin
clrscr;
write('a=');
read(a);
write('b=');
read(b);
P:=(a+b)*2;
S:=a*b;
writeln('P=',P);
writeln('S=',S)
end.

Решение задачи №3program pryam;uses CRT;var a,b,S,P: integer;beginclrscr;write('a=');read(a);write('b=');read(b);P:=(a+b)*2;S:=a*b;writeln('P=',P);writeln('S=',S)end.

Слайд 8 Задача №4


Написать программу нахождения периметра и площади. Сторона

Задача №4Написать программу нахождения периметра и площади. Сторона квадрата вводится с клавиатуры.

квадрата вводится с клавиатуры.


Слайд 9 Решение задачи №4
program kvadrat;
uses CRT;
var a,S,P: integer;
begin
clrscr;
write('a=');
read(a);
P:=4*a;
S:=sqr(a);
writeln('P=',P);
writeln('S=',S)
end.

Решение задачи №4program kvadrat;uses CRT;var a,S,P: integer;beginclrscr;write('a=');read(a);P:=4*a;S:=sqr(a);writeln('P=',P);writeln('S=',S)end.

Слайд 10 Задача №5


Написать программу нахождения площади прямоугольного треугольника. Длины

Задача №5Написать программу нахождения площади прямоугольного треугольника. Длины катетов вводятся с клавиатуры.

катетов вводятся с клавиатуры.


Слайд 11 Решение задачи №5
program treug;
uses CRT;
var a,b,S,P: real;
begin
clrscr;
write('a=');
read(a);
write('b=');
read(b);
S:=0.5*a*b;
writeln('S=',S:2:2)
end.

Решение задачи №5program treug;uses CRT;var a,b,S,P: real;beginclrscr;write('a=');read(a);write('b=');read(b);S:=0.5*a*b;writeln('S=',S:2:2)end.

Слайд 12 Задача №6


Написать программу нахождения значения выражения

Задача №6Написать программу нахождения значения выражения

Слайд 13 Решение задачи №6
program prog;
uses CRT;
var a,x,y: real;
begin
clrscr;
write('a=');
read(a);
write('x=');
read(x);
y:=(sqr(x)-sqrt(x*a))/abs(a);
writeln('y=',y:2:2)
end.

Решение задачи №6program prog;uses CRT;var a,x,y: real;beginclrscr;write('a=');read(a);write('x=');read(x);y:=(sqr(x)-sqrt(x*a))/abs(a);writeln('y=',y:2:2)end.

Слайд 14 Задача №7


Написать программу нахождения площади треугольника со сторонами

Задача №7Написать программу нахождения площади треугольника со сторонами по формуле Герона.

по формуле Герона.


Слайд 15 Решение задачи №7
program treug;
uses CRT;
var a,b,c,p,s: real;
begin
clrscr;
read(a,b,c);
p:=0.5*(a+b+c);
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('s=',s:2:2)
end.

Решение задачи №7program treug;uses CRT;var a,b,c,p,s: real;beginclrscr;read(a,b,c);p:=0.5*(a+b+c);s:=sqrt(p*(p-a)*(p-b)*(p-c));writeln('s=',s:2:2)end.

Слайд 16 Задача №8


Написать программу нахождения суммы цифр двухзначного числа.

Задача №8Написать программу нахождения суммы цифр двухзначного числа. Число водится с клавиатуры.

Число водится с клавиатуры.


Слайд 17 Решение задачи №8
program summa;
uses CRT;
var X,a,b,S: integer;
begin
clrscr;
write('x=');
read(x);
a:=x div

Решение задачи №8program summa;uses CRT;var X,a,b,S: integer;beginclrscr;write('x=');read(x);a:=x div 10;b:=x mod 10;S:=a+b;write('S=',S)end.

10;
b:=x mod 10;
S:=a+b;
write('S=',S)
end.


Слайд 18 Задача №9


Написать программу нахождения суммы цифр двухзначного числа.

Задача №9Написать программу нахождения суммы цифр двухзначного числа. Число водится с клавиатуры.

Число водится с клавиатуры.


Слайд 19 Решение задачи №9
program summa;
uses CRT;
var x,s: integer;
begin
clrscr;
read(x);
s:=(x mod

Решение задачи №9program summa;uses CRT;var x,s: integer;beginclrscr;read(x);s:=(x mod 10)+(x div 100)+(x mod 10 mod 10);write('s=',s)end.

10)+(x div 100)+(x mod 10 mod 10);
write('s=',s)
end.


Слайд 20 Задача №10

С клавиатуры вводятся скорости двух автомобилей. Какое

Задача №10С клавиатуры вводятся скорости двух автомобилей. Какое расстояние будет между

расстояние будет между ними через 3 часа, если автомобили

выехали из одного пункта в одном направлении. Напишите программу.



  • Имя файла: reshenie-zadach-po-teme-programmirovanie-lineynyh-algoritmov.pptx
  • Количество просмотров: 151
  • Количество скачиваний: 0