Вашу программу я сделал.
Ссылку отправляю в лс.
так как по не понятным причинам удалили пост.
Уважаемые модераторы, сюда не можно залить файлы проекта визуал бейсика..и как быть?
А) 10111,01 (2 сс) = 16+4+2+1+0,25=23,25 (10 сс)
б) 388 (10 сс) = 184 (16 сс)
в) 30,65 (8 сс) = 24+0,75+0,078125=24,828125 (10 сс)
Правая кнопка мыши, создать - выбираем папку, называем её, а при необходимости её переименовать кликаем по ней правой кнопкой мыши и переименовать.
Задание 1.
Если нужна прога, то выводы и объявления сама накидай. А так: <span>Y:= sqrt(abs(2*sqr(x) - 7*x) + 12)
Задание 2.
На картинке не видно ни черта.
Задание 3.
s:=1;
for i = 1 to 2*n do
s = s*2
Задание 4.
for i = 1 to 20
s:=a(i)+a(i+1)
вне цикла
s:=s/20
Задание 5 - черт знает. С матрицами в Паскале не работал, да и как-то не хочется. Программы могут работать криво: закарючки расставь, пожалуйста, сама, я редко программирую в Паскале.</span>
Program qq;
var a,b:integer;
begin
writeln('Введите число a');
readln(a);
writeln('Введите число b');
readln(b);
if a>b then
writeln(b);
or
writeln(a);
end.