Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
6, понедельник, иа, 1, на печи,клюв, царь, марка, гласных 10, согласных 21, всего 33
оба ответа подходят в языке
но логичнее нет
просто у нет в 2 функции: согласие с отрицанием и отрицание отрицания
ответ нет, на рисунке белая скатерть
(я выразил отрицание к вопросу)
словом нет можно выразить и отрицание и согласие
да здесь вообще не подходит его не рассматривает
у нет 2 варианта либо согласие с отрицанием - нет, скатерть не белая. либо отрицание вопроса - нет, белая.
var a: array [1..10] of integer;
i,k: integer;
begin
read(a);
k: =1;
for i : = 1 to 10 do
if a[k]> a[i] then k: =i;
end;
if k mod 2 = 0 then writeln(k," - chetnoe")
else writeln(k," - ne chetnoe");
end.
картинка должна быть в папке с программой и быть в формате bmp
usesgraphabc;
varn: string; b: picture; s: integer;
beginwriteln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.
Популярные вопросы