Домашняя контрольная работа по теме «Алгоритмизация и основы объектно-ориентированного программирования»

Домашняя контрольная работа по теме «Алгоритмизация и основы объектно-ориентированного программирования»

№1. Тре­бо­ва­лось на­пи­сать про­грам­му, ко­то­рая ре­ша­ет урав­не­ние от­но­си­тель­но х для лю­бых чисел a, b, вве­ден­ных с кла­ви­а­ту­ры. Все числа счи­та­ют­ся дей­стви­тель­ны­ми. Про­грам­мист то­ро­пил­ся и на­пи­сал про­грам­му не­пра­виль­но. Найдите ошибки в программе и напишите правильный вариант.

var a,b,x:integer;

begin

readln(a,b,x);

if c/a<0 then writeln('Нет корней'); else

if c/a=0 then writeln('x='0)); else

if c/a>0 then writeln('x1=',sqrt(s/a)/,'x2=',-sqrt(c/a)/);

end.

№2. Опре­де­ли­те, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­ще­го фраг­мен­та про­грам­мы:

var i: integer;

begin

i:=2;

while i <= 12 do begin

writeln(i);

i:=i+4;

end;

end.

№3. Вводится действительное число x. Вычислить значение функции

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

Пример:

Ввод данных	Вывод данных
	Не превосходит
	Превосходит

№5. Вводятся два целых числа A и B. Вывести дроби

Дата добавления: 2015-08-27