Есть ответ 👍

1.Дано сторони прямокутника a i b. Знайти його пдощу S=a•b 2. Намалювати коло радіуса 22, жовтим кольором та квадрат зі стороною 30 зеленим кольором

110
466
Посмотреть ответы 1

Ответы на вопрос:

SForest
4,5(48 оценок)

Предпоследняя строка. перед ('no'); должно быть write или writeln. var   n, a, b, c, d: integer; begin   writeln('vvedite chislo');   readln(n);   a: =n mod 10;   b: =n mod 100 div 10;   c: =n mod 1000 div 100;   d: =n div 1000;   if (a=d) and (b=c) then write ('yes')                                         else writeln('no'); end.

Популярно: Информатика