Тут легко, нарисовать правдо не могу сейчас, первым делом это блок начало, затем блок ввода числа б , то есть количество машин, затем следующий блок ввода данных а, то есть цена машины, затем блок рассчета, с=а*б, то есть подсчёта выручки, затем блок вывода выручки и блок конец. Могу программу попробовать накидать если напишешь язык программирования
По логике так, возможны ошибки
Алг задача Нач Цел a, b,c Вывод "введите количество проданных машин: " Ввод а Вывод "введите цену за автомобиль: " Ввод b С:=а*b Вывод c Кон
const n=40; var a:array [1..n] of integer; i,k:integer; begin Randomize; k:=0; Writeln('Исходный массив'); for i:=1 to n do begin a[i]:=random(63)+20; Write(a[i],' ') end; Writeln; Writeln('Четные элементы, кратные 3'); for i:=1 to n do if a[i] mod 6=0 then begin Inc(k); Write(a[i],' ') end; Writeln; Writeln('Отобрано элементов: ',k) end.
const n=20; var a:array [1..n] of integer; i,imin:integer; begin Randomize; Writeln('Исходный массив'); imin:=1; for i:=1 to n do begin a[i]:=random(351)+20; Write(a[i],' '); if a[i]<a[imin] then imin:=i end; Writeln; Writeln('Минимальный элемент a[',imin,']=',a[imin]) end.
б - не может содержать ,
в - правильно
д - на русском переменные не пишутся