20 .

надо сделать 36 , по условию нужна еще 26, скинула её тоже.
необходимо сегодня решить.
подробно .
и отмечу лучший.

Перепроверь массив и скомпилируй.
// Example program#include <iostream>#include <string>
using namespace std;
int count_;const unsigned int DIM1 = 6;const unsigned int DIM2 = 6;int m[DIM1][DIM2] = {    { 'S', '.', '.', '.', '#', '#' },    { '#', '.', '#', '.', '.', '.' },    { '.', '.', '#', '.', '.', '#' },    { '.', '.', '#', '#', '#', '.' },    { '#', '.', '.', '.', '#', '#' },    { '#', '#', '#', '.', '.', 'F' }};int find_p(int x, int y) {    if (x < 0 || x > 5 || y < 0 || y > 5) return 0;    if (m[y] [x] == 'F') return 1;    if (m[y] [x] != '.' && m[y] [x] != 'S') return 0;    m[y] [x] = '+';    count_++;    if (find_p (x, y - 1)) return 1;    if (find_p (x + 1, y)) return 1;    if (find_p (x, y + 1)) return 1;    if (find_p (x - 1, y)) return 1;    m[y] [x] = 'x';    return 0;}int main(){  find_p(0, 0);  cout<<"\n Otvet="<<count_;}

Program one;var a,b,c,d,e,g:integer;beginwriteln('Введите цену помидор за один килограмм (в рублях)');readln(a);writeln('Введите вес помидор');readln(b);writeln('Стоимость покупки: ',a*b,' руб');writeln('Введите цену огурцов за один килограмм (в рублях)');readln(c);writeln('Введите вес огурцов');readln(d);writeln('Стоимость покупки: ',c*d,' руб');writeln('Введите цену яблок за один килограмм (в рублях)');readln(e);writeln('Введите вес яблок');readln(g);writeln('Стоимость покупки: ',e*g,' руб');end.
Также смотри вложение .